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“Without a doubt, the Premiere Resource Editor 
for the Mac OS A wealth of time-saving tools* ” 

- Mac User Magazine Eddy Awards 

“A disti nc t i mpro ve m e nt over App le’s ResEdi t. ” 

- MacTech Magazine ^^B 

“Every Mac OS developer should own a copy of ResorcererJ ^^B 

- Leonard Rosenthal, Aladdin Systems 

*Without Resorcerer, our localization efforts would look like a ^ 

Tower of BabcL Don't do product without it!” 

- Greg Gala nos, CEO and President, Metro we rks 

'Resorcerer f s data template system is amazing A 

- Bill Goodman , author of Smaller Installer and Compact Pro 

“Resorcerer Rocks! Buy it, you will NOT regret it A 

- Joe Zo bk iWy a u th o r of A Frag men l of Yo u r I magi n a tion 

"Resorcerer will pay for itself many times over in saved time and effort. ” 
— Mac User review 

“The template that disassembles 'PICTs is awesome!” A 

- Bill Steinbergauthor of Pyro! and PBTools Jn 

“Resorcerer proved indispensible in its own creationi* mm 

— Doug McKenna, a u thor of Resorcerer 
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Version 2.0 



* Very fast, HP’S browser for viewing file tree of all volumes 

* Extensibility for new Resorcerer Apprentices (CFM plug-ii 

• New AppleScript Dictionary (*aete r ) Apprentice Editor 
■ MaeOS 8 Appearance Manager-savvy Control Editor 

• PowerPlant text traits and menu command support 

* Complete AIFF sound file disassembly template 

* Big-, little-, and even mixed-endian template parsing 

• Auto-backup during file saves; folder attribute editing 

• Ships with PowerPC native, Fat, and 68E versions 


Extensibility for new Resorccrer Apprentices (CFM plug-ins) 
New AppleScript Dictionary (‘aetc’) Apprentice Editor 



Requires System 7.0 or greater, 
I.SMB RAM, CD-ROM 


Standard price: $256 (decimal) 
Website price; $128 - $256 
(Educational, quantity, or 
other discounts available) 


Fully supported; its easier, faster, and more productive than ResEdit 
Safer memory-based, not disk-file-based, design and operation 
All file information and common commands in one easy-to-use window 
Compares resource files, and even edits your data forks as well 
Visible, accumulating, editable scrap 

Searches and open s/m ark s/selects resources by text content 
Makes global resource ID or type changes easily and safely 
Builds resource files from simple Rez-like scripts 
Most editors DeRez directly to the clipboard 

All graphic editors support screen-copying or partial screen-copying 
Hot-linking Value Converter for editing 32 bits in a dozen formats 
Its own 32-bit List Mgr can open and edit very large data structures 
Templates can pre- and post-process any arbitrary data structure 
Includes nearly 200 templates for common system resources 
TMPLs for Installer, MacApp, QT, Balloons, AppleEvent, GX, etc. 

Full integrated support for editing color dialogs and menus 
Try out balloons, *ict* P 1 ' ‘ ‘ 

Integrated gingle-wi 

Editors for cursors, versions, pictures, bundles, and lots more 
Relied on by thousands of Macintosh developers around the world 


Includes: Electronic documentation 
60-day Money-Back Guarantee 
Domestic standard shipping 


Payment: Check, PO s, or Visa/MC 
Taxes: Colorado customers only 


Extras (call, fax, or email us): 
COD, FedEx, UPS Blue/lied, 
International Shipping 


MATHEMjESTHETICS, INC. 

PO Box 298 

Boulder, CO 80306-0298 USA 
Phone: (303) 440-0707 
Fax: (303) 440-0504 
resorcerer@mathemaesthctics.com 



lb order by credit card, or to get the latest news bug fixes, updates, and apprentices, visit our website... 


www.mathemaesthetics.com 
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VIEWPOINT 


Hy Jordan D&z-Maltson 

Of Tulips and Dot.COMs 


A Mania for Turns 

In his book tLxtmordinary Popular JMuskm & the Madness of 
Crowds, Charles MacKay recounts rhe history of the Danish Tulip 
Mania of the L7lh Century. It is a fascinating story that has definite 
lessons for us today. 

Tulips were originally introduced to Europe from Turkey in die 
mkl 1500s. Their Ixrauty made them popular among die well to do 
and having various varieties in your garden soon became a status 
symbol, if not a requirement for being considered a cultured 
individual. Soon, connoisseurs, desiring to one-up one anntltcr, 
would focus on getting the right variety of bulbs, so that their gardens 
would be “just right”. 

As you might suspect as the popularity of tulips grew, the 
demand for tulip bulbs drove their prices higher and higher. Ordinary 
people seeing die price for individual bulbs double and then double 
again soon started buying them — noi to have them in their gardens 

— but as investments. 

Holland was hit particularly hard by the mania for tulips. An 
entire industry of tulip exchanges and brokers sprung up, and s<x>n 
ordinary folks were emptying their bank accounts and mortgaging 
their homes to get in on this sure-lire way to riches, 

A “crash” — or to use the new and improved, politically correct 
phrase, a “correction finally came, and when it did it was bloody. 
People Iasi their homes. Families were I bankrupt People’s “sure 
thing” investments in tulip bulbs returned to being what they were 
originally: the source of beautiful flowers* 

Today’s Tuijps 

For the last several years — up through March of this year — 
anything that smelled of "dot. coin", “Internet”, "digital conveigcnce”, 
or “new economy” was the “sine thing that would bring you untold 
riches. For a while — as in the Danish Tulip Mania — it seemed to 
hold ime. You could invest in almost any half-baked" idea — and 
lets lx: honest here, they were ideas not companies — and you 
would double your money in a couple of months* 

Hut when you dug into these ideas you found that many of them 
weren't and wouldn't ever l>e ready for baking* People were 
launching magazines on the Internet — a very Lough business, just 
ask our publisher — like Salon,com* and commanding valuations that 
you would never find placed on an established magazine with a 
stable subscriber base and lots of faithful advertisers* It was absurd. 

Even that darling of the internet's new economy, Amazon.com 

— which when you dig into i! is only a very slick and efficient retailer 

— was and still is, even at around S30 a share, absurdly overvalued* 

And like in the Danish Tulip Mania, a whole industry has grown 
up around the trailing of our latest mania. There are well sites — 
many of which, in the greatest of ironies, have gone public as part of 


our Internet Mania — chat rooms, magazines, and mutual funds, all 
of whic h are focused on driving the Mania forward 

And, like the Danish Tulip Mania, our Internet Mania seems to 
he unwinding itself to an extent As I write this column, rhe NASDAQ 
has finished a week long decline. A decline Thai has former Internet 
darlings like Amazon,com and e-toys further in the red than ever 
before. The mania pan of the Internet seems to be — unlike the 
Danish Tulip Mania — i mplex ling softly. 

It Isn’t All Mania 

I f you a re read ing this a i] 11 rnn * yt hi in all pn )1 rz hility agree w i 1 1 1 
me that the Internet is going 10 change the way that we live across 
the lx >aal. You probably agree that we haven’t seen but a glimmering 
of the beginning of the changes it will bring* Hus Ls true, but it is 
going to be a long hand road to the Promised land”* Unfortunately, 
ii is going lo lx: a long road with a lot of potholes along the way. 

The mania Isn't over. It has just subsided for a while. In the years 
ahead, there will lx. 1 Internet related gold rushes from lime to lime. 
Gold rushes that will happen, because in large pan “there is gold in 
them hills..,” Tins is the fundamental difference between the Danish 
Tulip Mania and our present dnt.com mania: if you dig hard enough, 
you am lind value. 

Making Money in a Gold rush 

In the California Gold rush of 1849 and any of the others T 
have studied — for every |X:rson dial struck it rich prospecting for 
gold, there were hundreds that lost everything* It wasn't rhe miners 
or the prospectors that made fortunes. 

The folks that struck it rich in each and every gold rush 
were those that provided goods and services to the miners 
and the prospectors. It was people selling denim jeans — does 
the name Levi-Strauss ring a bell, food, laundry service, tools, 
banking, and recreation* 

This is a lesson that we should keep in mind as we survey the 
business prospects in the “new economy ”. Over the last few years 1 
have watched friends and acquaintances stream into the businesses 
of the “new economy” one by one. I have seen them go to one “sure 
thing" after another. They have gone to web-tailor and business to 
business exchanges. They have joined network infrastructure 
companies and system integrators. By and huge they are all doing 
well, hut the ones that are most secure are the ones that are selling 
something to the “miners” and “prospectors" of the Internet gold rush 

If you want to make your fortune on the frontiers of the New 
Economy, i recommend that you focus on providing services to Llie 
prospectors with stars in 1 heir eyes and cash in ihcir pockets. But make 
sure liiai you get cash up-front, and try and get a piece of each claim 
that they file. Who knows, one of them might strike a mother-load* 
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Question: Is MacHASP USB* a 
software security key or a 
sates tool? 

Answer: It's both! 

MacHASP USB is the world’s first 
software protection key for the 
iMac. It gives you sophisticated 
license enforcement and compre¬ 
hensive protection against illegal 
use... in other words, real security. 

Then it gives you a big selling 
advantage. 

With MacHASP USB, you can 
license multiple software modules 
and applications. You can instantly 
unlock or upgrade them in the 
field. Plus you can freely distribute 
demos. 

Bottom line: MacHASP USB locks 
out illegal users and unlocks your 


full sales potential - without 
getting in anyone's way. Cali now 
to request a Developer’s Kit and 
our newly published guide to USB 
features and benefits. 

‘For all USB-equipped Macs running an OS 
with USB support. Fully compatible with the 
ADB version of MacHASP. 

DU 
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Mac OS 

USA: 1-800-223-4277 
2 1 2-564-5678 
Int’l: 972-3-6362222 

www.aks.com/mt 

ALADDIN 

KNOWLEDGE SYSTEMS LTD 


Mac software protection provider, Micro Macro Technologies, becomes part 
ot Aladdin, giving its customers even better service from the number one name. 





GETTING 
STARTED - 
NETWORKING 


By John C. Welch 


AppleScripting Your Network 


How to use Apple’s second 
- best kept secret to make 
your life easier 


Welcome 

As you can guess, l am going to talk 
alxniL the how's and why's of using 
AppleScript to make your life as a network 
administrator much easier Well talk a I xml 
some of the reasons for using AppleScript 
to run networks, and some of the instances 
when you would, or would not want to 
use AppleScript. Well also take a look at 
some example scripts that I use to make 
my life easier 


Background 

Just to give you an idea on where I am 
coming from in my approach to scripting a 
network, 1 think it’s important to give you 
an idea of what my network consists of. 
Al-lt, like most scientific companies, has 
more than one operating system and 
hardware platform that it uses to get the job 
done. Our primary platform is Sun Solaris 7 
on Sun Sparc hardware. We also make 
extensive use of SGI's Irix, IBM's AIX on 
RS/OOOOs, and Linux, both on Intel and PPC. 
Our non-Unix operating systems include 
Windows 98, Windows NT, Windows 2000, 
and OS/2 on Intel hardware, and Mac OS 
8,6 and 9 0,4 on Apple hardware. My direct 
responsibility is as the administrator for 
some 70+ Mac and Wintel machines, with 
indirect responsibility lo everything else. 


So, for my needs, any scripting 1 do, has to be able to handle 
non iVlacOS machines whenever possible. This makes tilings, 
well, interesting at times. But then again, that makes it fun. We 
also let the users, and their department heads decide for 
themselves what hardware to use, so any standards in that area 
come from the people using the equipment, instead of the 
people fixing it. Managing all this can be a handful, and without 
AppleScript, dam near impossible. 

Foundations 

First of all. before you can script any thing, from a network 
to email, you need to lx- familiar with what you are scripting, and 
its capabilities, both good and bad. That means there are some 
critical pieces of the picture that you must know to script your 
network well. 

Know Your Network 

This means, that for the areas you have responsibility over, 
you have to know tilings at a physical level. You should know 
lias much about the wiring runs, and wiring closets as possible. 
Where possible, get a set of blueprints, and diagram where the 
wire runs travel, and how they gel in and out of the closets. This 
obviously has to bow to common sense. If you have twenty 
buildings in seventeen countries to manage, it may be impossible 
to gel ail the blueprints for you network, but you should pul 
forth a sincere effort to know where your wires are. 

This also means that you need to know your network 
equipment. Having bright shiny C4s will save you no time if your 
hubs are shared 10Mbps to hundreds of users. You need to know 
what your network equipment is, and what it can and cannot do 
as well, Remember, a network is almost a living organism, and 
any scripting done in that environment must be done holistically. 
It docs you no good To have a fantastic script that requires 
AppleTalk drive mounting on servers in another subnet, if none 
of your routers are passing AppleTalk. 

Once you have these parts, then you need to know how 
your network Ls laid out logically as well as physically. You may 
be one jack over from a file server, but if your network makes 


John Welch <jwelch@aer.com> is the Mac and PC Administrator for AER Inc., a weather anil atmospheric science company 
in Cambridge, Mass lie has over fifteen years of experience at making computers work. His specialties are figuring out ways 
to make the Mae do what nobtxly thinks it can, and showing that the Mae Ls the superior administrative platform. 
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use of VLAN, (virtual LAN) switches, then your logical layout 
may have you many subnets away from that same server. Again, 
depending on what you need to automate, then the differences 
ixnwcen logical and physical layout, and how aware of them 
you are make the difference I between success and failure. 

Know what computers and operating systems are going to 
he affected by your scripting. It does no good to write scripts 
that assume your PCs are running Windows 9B if they are 
actually running Windows 2000. On the Mat: side, differences in 
support for various AppleScript features between versions of the 
MacOS ran complicate your life to an amazing degree if they 
catch you by surprise, Along with this, take a little time to find 
out whai the users thinks that they are using their computers for. 
The answer might surprise you, as users have an uncanny ability 
to customize their computers to work Ix^si for their needs. This 
is not bad or gtxxl, but rather something you need to be aware 
of. TlmL computer is their tool first, and yours second. Make sure 
that by making your life easier, you don't make theirs harder. 

All of the above boils down to knowing how your network 
is designed and installed, and why it is set up the way it is, Hy 
taking the time to do this, you lay the ground work for 
successful scripts. 

Tasks 

The next step, once you know what you are trying to script 
at I lie network level is to Lake a look at the tasks that scripting will 
take over for you. Some common tasks that lend themselves to 
scripting are things like software licensing monitoring, software 
updates and installations, collecting statistics on various network 
functions and resources, monitoring the usage of your network 
resources, and other such repetitive tasks. Resides Lhe tasks 
themselves, you need to look aL the frequency of the tasks. A print 
queue that hangs up once a year is probably not worth scripting, 
but the weekly web log processing is, fake a look at which tasks 
are cyclical and repetitive, and which ones happen at such 
random, or infrequent times as to be easier to do manually. 

Tor the cyclical tasks, take a look at die periods involved, 
Don't just focus on how often the task needs to be done, but 
correlate dial to the length of time die task takes. A daily, hour 
long task is a lietier candidate for scripting than a five minute 
task that runs every six months. Also, make sure you keep the 
priorities of lhe tasks in mind. While it may he fun to script an 
oddball job, making sure the critical ones are running when 
needed is usually more important 

Planning To Manage 

The last section of the foundations of scripting a network 
is possibly more important than any of die others. You need to 
answer die question of whether or not a task should be scripted, 
Do you need to automate this task? Is it something that is 
properly suited to st ripling? Do you need to liave your fingers 
in that particular pie? Remember, you ate doing this for a reason. 
You need to have a dear goal, a clear idea on what die desired 
outcome of your script, or scripts is going to bc\ Don't just start 
banging out scripts Ijccausc you can. 
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Ask yourself, "C:in rhis task Ik? automated?” If the answer is 
yes, then decide on whether or noi ii should be. There are a lot 
of things that are done manually for non-tcchnica! reasons 
sometimes, and the folks you work with and for may not take 
kindly to you changing how tilings are done bemuse it was 
Tuesday. Another question to ask is how mindless is this task. 
Face it, a lot of the things we do take the intelligence of a snail, 
and those things are often begging to he automated. (1 have 
found that mindless usually holds repetitive^ hand, so if a Lask 
is one, its most likely the other too.) Bui, if the tusk needs the 
help of a roomful of theoretical physicists to run successfully, 
you probably don’t want to script it. 

If you are scripting data or statistics collections, then be 
wry clear on what the results need io he. Collecting millions 
of data points automatically with the mother of all scripts is 
useless if you miss the one data point you really needed. 
Although this may seem almost insultingly simple advice. I’ve 
seen people go down the wrong road, and walked in my own 
footsteps on that road too many times. Make sure you know 
what you are trying to accomplish, 

Applications 

Don't Reinvent the Wheel 

First of all, not everything can he scripted. Face it, there are 
tasks that will just have to lie run manually. This is noL a 
challenge to your ability as a scriptei; just a fact of life In any 
event, ids impossible to script things to ihc nth degree, Even if 
you came close, you would end up spending as much lime 
maintaining the scripts as you did when you did everything 
manually. Wasted time is wasted lime, regardless of how it 
happens. You have to Irak nee time spent scripting and 
maintaining those scripts against the time you actually save. If 
you can't ai least break even, figure out another way to do the 
task. Remember, time is money, and lots of ii Uxx 

Secondly, don’t waste a lot of time searching down 
OSAXen. and memorizing the AppleScript language Guide, in a 
quest to create a network management system in AppleScript. 
Play to AppleScript's strengths. It’s a system level toolbox, that is 
ai ids Ixxst when it is 'gluing' the abilities of one application or 
system feature to another, thereby giving both new capabilities. 
There are many excellent off the shelf applications that will do 
a lot of what you would kill yourself trying to do manually. Use 
AppleScript with these applications, not instead of them. Not 
surprisingly, almost all network administration applications are 
script aide. By taking advantage of the features in an existing 
program, you let the program and the computer do all the work, 
instead of you. Remember, you’re an administrator, not a 
programmer. Programmers make tools, administrators use tools. 
Think like an administrator, and you’ll do well. 


ScriptaMe Applications For The Network 

Here is a partial list of scriptahle applications that I make 
frequent use of in my administration duties; 

* BRFdit - <http://www.barebonesxom> 

This is one of the best tools around for doing anything that 
requires searching and replacing of text. I know that you can 
do anything BBEdit does in Perl, but BBEdit is easier to use, 
and to script, I use it for everything from parsing LDIF files 
to reformatting email address lxx>k files. Tfs fast, easy to use, 
and can do almost anything you can think of with text, and 
tfs very scriptahle. 

* netOctopus - <http:MAA^w. netopia .corn^software/netoctopLB/index. html> 
This product allows you to do configuration management, 
remote installs, software 1 usage monitoring, collect statistics, 
almost anything a network administrator needs to do, and il 
works on Mac OS and Windows. It’s also completely 
scriptahle, and il allows you to script administration functions 
on Windows as well as the Mac OS. You haven't lived until 
yoifve done Windows Registry edits via AppleScript on 30 
PCs ai once. An amazing look and one I can't live without. 

- Timbuktu Pro - <http://vwwv,netopia.o)m/softvvare/tb2/inctex.html> 
Timbuktu, also from Netopia, fills the one hole in 
netOctopus \s arsenal, that of remote control. Hus application 
gives you total remote control over any Mac or Windows 
box, and like netOctopus, its highly scriptahle. This is one 
of ihose tools you never think you need until you tty it. 

* Retrospect - <http://www.dantz.com/> 

No treatise on networking is complete without a reference 
io Retrospect. Retrospect is one of the l>esi backup 
applications on the market, and holds its own quite well 
against some very stiff competition. The nice thing about the 
scripting features in Retrospect is that Dantz makes it very 
easy to use it along with your email client of choice, so that 
you can have it email you status, instead of having to check 
things manually. 

* FunneJWeb Pro - <http://www.activeconcopb,com> 

This is a web log analyzer that will slice and dice your data 
any way you like, and build you some sweet little 3-D graphs 
of ii all sci that you can easily show what your web servers 
are doing. A nicely scriptahle application, that has a very nice 
feature set. 

There are literally hundreds more applications like these, 
but to list them all would take me almost the entire magazine. 
Take a look at the applications you already use, chances are, 
most are scriptahle. 

Scripting 

So, now that we have the basics of what to do before 
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Cookies 


Searchable Databases 
Online Stores 
Info Baskets 
Guestbooks 
Banner Ads 
Credit Card Transactions 

Counters 
Password Protection 
Surveys 
Quizzes 
Form Processing 
Conditionals 


E _ _ 



Date and Time 

f 


File Includes 

I 

m 


File Writes 

i 

■ 
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It's time for you to take a look at MGI 

MG I, a piug-in to 4D's award-winning server, WebSTAR, is 
designed to provide functionality to otherwise static web sites, 
whether for a private intranet or enterprise - class ISP/ASR 
MGI was specifically developed to be used by web graphic 
designers with no scripting or programming experience. If 
you know HTML, you know MGI. And if you are a 
programmer, you can learn MGI by the time your pizza is 
delivered. You can try out MGI for free - right now - without 
obligation by downloading a fully - functioning demo at: 


http://www.pageplanetsoftware.com 


e. 
















you script, let’s get into the fundamentals of actually scripting 
the network, ’t hese can be illustrated as What, Where, When, 
Why, ami How, 

What 

The first thing to establish is what exactly is the code you 
are writing going to accomplish. Remember, you are automating 
a task, a single task in mast cases. Keep your script focused on 
that task. While it may he fun to think about nifty features, that 
runs counter to what an administration script is about. In most 
cases, your script won't have an interface. This is either !>ecause 
you don’t need one, or can’t run the script if user input is 
required. The script will also need to be able to run unattended. 
Since the wee hours of the morning are the slow times on most 
networks, this is, coincidentally, the l?est time to run network 
scripts. Since you most likely don't like being at work at three in 
the morning, the script needs to Ik- reliable as well as faceless. 

For this type of scripting, 4 the smaller the better is not a bad 
mantra. From a reliability standpoint, two or three smaller 
scripts, each doing a single task are far better than a targe script 
trying to handle those same two or three tasks. If it gcLs written, 
at some point it has to be debugged, and that gets harder 
exponentially with the size of the script. In general if it’s too big 
for the Script Editor* it’s probably too big. 

Where 

Since you arc going to be running many of these scripts 
from a single Mac, it lx:hooves you to take some time It) plan 
out your script server. As far as what kind of Mac to use, I would 
say that is dependant on the type and number of scripts running. 
From a speed to cast standpoint, I would say nothing less than 
a G3- Although there are a lot of server applications that run l ine 
on older hardware, scripts are somewhat dependant on the CPU 
speed. I wouldn’t necessarily run out and gel a new G4 server, 
as there Is not much, if any G4 - specific optimizations jn 
AppleScript., so any speed increase would be due to overall 
system speed, as opjx>scd u> the AIrivet: units. 

Since AppleScript is CPU - dependant, I would avoid 
servers that are already under heavy CPU use. In particular, 
avoid FileMaker Pro servers, (or any database server for that 
matter), or Retrospect servers. Both of those applications make 
heavy demands on virtually every system on the Mac, and 
neither reacts well to being in the background. In addition, if 
your script is in the background with eillier one of ihese 
applications, or applications of a similar type running, the CPI 1 
time the script gets may be so small as to cause timeout issues. 

I have found that a not too heavily burdened AppleSharelP 
server is not a bad choice, as AppleSharelP is essentially a 
background - only server anyway, and does not make as much 
demand on CPU as it does on I/O. Make sure that you don’t try 
to push an overloaded AppleSharelP server texi hard though, as 
it will crash, which will do you no good whatsoever. 


Obviously, the ideal situation is a standalone Mac. You want 
to have no earlier than MaeOS 8,6 running on it, although 9.0.4, 
with the current AppleScript updates is a good combination as 
well You will want to have some form of scheduling software 
on the server for your scripts. I have had good luck with iDO, 
but whichever one works best for you is as good a choice as any 
other. ’Hie nice thing about a script server is that with the 
exception of RAM, (64MB is just not enough), there is no need 
to update the slock hardware, so you can use a fairly low - cost 
configuration as tile server. 

When 

Try to avoid scripts that can only run at specific times. This 
is not to say that there aren’t times that are Ix-LLer to run scripts 
than others, but avoid scripts that can only run at ten in the 
morning on Wednesday. For example, trying to install Office 98 
on fifteen Macs while you are running your backups is probably 
noi the best example of liming, bandwidth - wise. On the other 
hand, if you have a lol of mobile users, you may have no choice. 
The trick here is to avoid that iyj>e of situation whenever 
possible. Ibis is where my earlier admonition about knowing 
your network thoroughly comes in handy. 

If at all possible : early in the morning is a great time. Even 
the biggest workaholic tends to knock off by three am or so. 
This is an especially handy time if the script needs an hour or so 
of high bandwidth lo run well Make sure you are balancing 
your CPU and I/O capabilities with the script requirements. 
Don't try to make an hour script fit into a thirty minute time slot, 
lit addition, if you have multiple scripts running, try not to shave 
the timings too dose. The MacOS does a decent job of 
multitasking, but it does fall down here occasionally. Resist the 
temptation to see how many scripts you can have running at 
once* or kicking off within seconds of another one ending. 
’Frying to push your script server too hard, or the timing program 
too hard is just begging for a painful example of Murphy’s law. 

Why 

Although l talked about this before, it's important enough 
to repeal. Ask yourself again, why arc? you writing this script. 
Remember* you are doing this Ixrcausc you need to do it in a 
script, not because you can do it in a script. Assess your needs 
carefully here, and balance them against what the task requires. 
There ate times when manual is belter than automatic. The idea 
behind scripting your administrative duties is to make your life 
easier, not just as hard in a different way. If a job that normally 
takes five minutes once a month ends up needing a scripL that 
takes twenty minutes to run, a week to write, and is us twitchy 
as a cat in a room full of rexking chairs is not going to help you 
in the least. Make very, very sure that the end result of your 
.scripting effort will lx? better than the current situation. 

How 

Once again 1 say plan, plan, plan. Since you are going to lx? 
affecting an entire network, you cannot afford to wing it. As 
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professional divers say, "Plan your dive, and dive your plan." In 
other words, take time, and figure out exactly what you need to 
do to get the results you want, then write the script to do exactly 
that, and no more. Of course, with actually writing the script, the 
tools you use become important* 

For just writing the script, getting the code on media, i still 
prefer Apple's Script editor. I is very basic, and rather Spartan, 
but I personally find this to be an advantage, as it gets in my way 
less* Script Editor is a clean sheet of paper, and for some Lhis can 
be a help. I also really like its dictionary display. Tf you want a 
dean display, but with more features, then Smile can be a help 
too. it's freeware, so if you find you don't like it. then you have 
only lost download time. It also has a devoted user community, 
who are more than happy u> help you out in discovering Smile's 
hidden features. 

As you get to a point in your script where you need better 
debugging capabilities then Smile or Strip! Editor give you, 
considering a higher end development environment, such as 
Scripter, or Script Debugger is not a bad idea* Both products do 
an excellen! job, both are weII-mainrained, and will server you 
well. Like any tool, I recommend trying both out, and seeing 
which one fits your needs and your style best* 1 know that I have 
left out FaceSpan, which is another excellent development tool, 
but as that is more of an interface builder, and the idea here is 
to avoid user intervention, FaceSpan doesn't lit in. 

Regardless of the tool used, there are some basic principles 
to follow. First of all, build Lhe script gradually. Each script has 
a core function, which should be built first, and tested first. Once 
the core is done, then any other features that need to be there 
for the core 1(3 function correctly gel built. Again, avoid feature 
it is 1 like the plague here, Ks unnecessary, and witll only cause 
you problems when you try to implement the script. 

The second principle is don't reinvent the wheel unless you 
have to* As you write scripts, try to write them in a way that lets 
you use parts of them in other scripts easily* As you dej this, you 
will find that you can build more of your new scripts from old 
scripts, saving you time on the actual coding phase. In line with 
this, keep up to date on various scripting resources, links to 
which can be found on Apple's AppleScript page, at 
1 1 Up:// w ww.a pp I e *a >m/a ppicseriptA There arc a lot of 
examples, as guidebooks, and other resources that quite often 
have sample code that does a lot of what you want or need to 
do. As long as it is being given away, Lake it and use it. Make 
your life easier. 

The final principle is 'Cool is nice, correct is better, 
Rememtxx these scripts have to run day in and day out, without 
handholding. They need to run correctly at all tunes, and they 
need to run reliably at all times. You cannot afford to have a 
network script that crashes your script server, or other servers, 
or user machines. By keeping the scripts small and simple, you 
will find this easier to avoid. 
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Example Scripts 

Now on to the fun purr of all of this, actual AppleScripts. All 
of these are scripts 1 use in my work, most of them work with 
other applications, or from within other applications. 

Enabling Windows NT 4 sp5 or greater to use plain text 
passwords 

This is one 1 have had to use on all my Windows NT PCs, 
Since 1 have my application installation points on an 
AppIeSharelP server, I need to turn on plain text passwords. By 
vising AppleScript, and netOctopus, ] can do this with ease. 
Besides, there’s something fun about doing Windows Registry 
modifications from a Mac! 

property NaSclor.tionErr : "There, is no cooputer geleiM-ctl. 
Please select one!" 

tell application “netOctopus" 

set thetfimiow to window “Computers" 

net tfieSejection to selection of tieWindow 
if tfi n&n 1ec tion exis l r then 

add registry value of jfroSc l ccl l on registry key path 
" lJJiSf_LOCAL_MAC]l INSv \S¥STEM\ \Cu r rentCun t rolSe t\\Services\ \ Rd r \ 
\Parameters* registry value name "EnabiePlainTextPassword" 
registry value type number value registry value "1" 
else 

display dialog Na'SelectionErc buttons [“Okay"I with icon 

stop 
end I f 
end leil 


■^SPSSfflF 



seven times faster 


free demo 
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Find memory errors automat ically in source 
Code Fragment Support 
Leek Detection 
Toolbox Parameter Checking 



The first line sets up an error message which is there to tell 
me that I need to select a computer to run the scrip on. I he next 
line sets the variable the Window to the net Octopus window 
called ‘Computers\ which is a listing of all Lhe computers, Mac 
and PC that netOctopus is currently managing. The third line sets 
theSe lection lo the computer selected in the Window, This will 
be the computer that the script runs against. The if statement thai 
follows makes sure that theSe lection actually exists. If it doesn't, 
that means that no computer was selected, and the else clause 
is invoked, which displays our error message from the first line, 
and exits the script. Lf theSelection is valid, the line following the 
if statement comes into play. This line tells the netOctopus agent 
on the target PC] Lo go down the regisLry path 
“ k! KE Y_ LOCAL. MAC HIN E\\S Y 8TE M\\C u rre n tContro! Set\\$e rv i cesWFt 
drWParameters" and add a new value to the key at that path, (The 
reason for the double ‘V characters is that that character is both 
the file path delimiter for windows, and has special meaning in 
AppleScript. The double 'V allows that character to be passed as 
a text value. To see whar actually is sent to the PC, just remove 
one ‘V from the path.) The new value is named 
"EnablePlainTextPasswordT is of type number 5 and has a value 
of‘T’, indicating that it should be enabled. Once the script runs, 
lhe PC gets rebooted, and voila! Plaintext passwords. A very 
handy and useful script that is only twelve lines long. 

Manually Scan Windows 9X drives with Norton Antivirus 

As anyone who has had to deal with 'Melissa 1 , and her 
offspring are aware of, keeping ahead of virii is both difficult 
and critical. This script lakes advantage of Norton AntiVirus's 
command-line scanner, and netOctopus s ability to run 
command-line PC programs to allow you to remotely scan drives 
on Windows machines. The script is very similar to the first one. 
In fan there are only two or three lines that differ, so 1 will only 
gn over those lines, 

property NoSelectionErr : “There is no computer selected. 
Please nel pc .t one! w 

properly thoPaih ; ”C:V\ Program FllesHNortcn Anti Virus** 
property theKxccutable : Tiavdx, exe" 

tell application "netOctopus 1 * 

set t/ieVitfdov to window "Computers” 

set £h$Seleettan to selection of theWitidow 
if theSe Tec tion exists then 

execute PC installer of (hcSvlat ion executable! path 
IbePaOj executable tJie&kfutsMe execute aging any drive 
letter parameter **/L /B+ /m+ /ilEURr 3 /S+ /REPAIR /OOALLF1LES 
/ZIPS" 
else 

display dialog NoSelectionErr buttons : "Okay"I with icon 

stop 
end I f 
end tell 

The second and third lines set up the path and application 
variables that are used in the script. The eighth line of the script 
is the one that does all the work. It tells netOctopus to run a PC 
installer on the selected computer. (This is actually Lhe way Lo 
have netOctopus run any program dial can be started from a 
command line, it doesn't have to lie an installer) The path and 
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executable are gotten from the variables rhePath and 
theExecu table. The parameters lo the executable are telling 
Norton Antivirus to scan all files on the drives, using maximum 
sensitivity, scanning Inside of compressed files, and to repair any 
infected files that are found. A script that can save you a lot of 
trouble, and it is again, alxxti twelve lines long. 

CONCIIISION 

There are a lot of scripts thai I and others use daily, bin 1 
think fve made my point. By using AppleScript, and script:! blc 
management applications, and taking advantage of the resources 
available from Apple and others, not only can you automate the 
tasks I demonstrated above, but everything from creating 
desktop printers and network configurations, to doing address 
book file conversion between email programs. I hope this article 
is a help, and I’ve included some links to various stripling 
resources in the references section. 

References 

* http://www.apple.com/applescript/ 

This is the I jest place lo start, as it has all of the Apple 
information on AppleScrijU, as well as all the links I have below. 

* http://www.mainevent.coni/ 

The makers of Scripter, one of two professional - level 
AppleScript Development environment. 


• http ://www. lists, a p pie, co m/I ists, taf ?1unct i on=subscr i bel nf o€t list name 
^AppleScript tJsers&digest^Yes&listType^-Discussion 

Ibis is where lo sign up for the Apple AppleScript Users list, 
tf you do almost any scripting, this is one of the best sources 
for help. Almost anyone who is anyone in the world of 
AppleScript is on this list, and the quality of help that I have 
received from it has always been absolutely top notch. 

• http://www.AppleScriptSourcebook.com/ 

Bill Cheesemans site, if it Lsrit on Apples site, then its 
probably here. An absolutely fantastic resource, 

• hftp://www. prefab.com/player.html 

The makers of P re Fall Player, an application that allows you 
to use AppleScript with applications that either aren’t 
seripfable, or have very poor scripting implementations. 

• http://www.latenight5w.com/ 

The makers of Script Debugger, the other professional level 
development environment for AppleScript, 

• http://wwwiandb.com/5mile/ 

A free AppleScript development environment. While it 
lacks the debugging and other features of Scripter and 
Script Debugger, it’s a very capable product, and the price 
cannot be teat. Mi 
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QUICKTIME 

TOOLKIT 


By Tim Monroe 


The Informant 


Getting and Setting Movie 
Information 


Introduction 

In the previous QuickTime Toolkit 
article, we saw how to create a 
QuickTime movie file Lhat contains a 
single video track. We also learned a 
fair bit about the structure of 
QuickTime movies (as collections of 
tracks) and QuickTime movie files (as 
collections of atoms). In this article, 
well continue on with the general topic 
of creating and configuring QuickTime 
movie files. Well see how to get 
various pieces of information about 
QuickTime movies and movie files; 
we'll also see how to add information 
to a QuickTime movie to help the user 
determine what's in a movie. 

To get an idea of what we're going 
to accomplish here, let's suppose that 
we’re running some version of the 
M< >vieP layer appl ication (the 

predecessor to the current QuickTime 
Player application). MoviePlayer’s Movie 
menu contains the item "Show 
Copyright.*/. If we select that item 
immediately after having opened the 
movie file we created in the previous 
article, well see the movie information 
dialog box shown in Figure 1. 



figure 1: 1he movie information 
dialog box for our neu> movie 


As you can see, this is not particularly helpful. The only 
real “information" visible to the user is the first frame of 
the movie, which happens to be a solid white rectangle. It 
would be better to display some other frame of Lhe movie 
and to add some descriptive information to the other 
panes of the dialog box. Figure 2 shows a much more 
useful movie information dialog box. 



This fs th* frit movte w* crtjltd m tfc* QutokTIm* «rl« of 

art te Its. It has a slog I# vidto trick that rhov* th* QuiokTtm* pongutn 
aptwtrbrfl frwn on all-wMf fVjt fr#nt 



Figure 2: The revised motie information 
dialog box for our new movie 


Tim Monroe has worked at Apple For over 10 years, first as a technical writer in die Inside Macintosh group and later as a 
software engineer in the Quick’lime group. Currently he is developing sample code and utilities for the QuickTime software 
development kit. You can reach him at monroe®apple,com, 
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Pan of our task here will he to see how to modify die 
movie file so that selecting "Show Copyright.displays die 
dialog box in Figure 2 rather than the one in Figure 1. In a 
nutshell, this involves setting the movie poster to some frame 
other than the first frame, which is the default poster frame; it 
also Involves attaching three new pieces of movie user data 
to the movie file. Along the way, well also learn how to set 
the preview that is contained in the file-opening dialog boxes 
displayed by calls to the StandardGetFilePreview and 
NavGetFile functions, Figure 3 shows a typical file-opening 
dialog box with a preview. 



Figure 3: A preview contained in a JHe-ofunnug dialog box 

Our sample api>lication tills time around is called 
QTlnfo, As usual, it’s based directly on the QTShell sample 
application that we've developed previously. QTlnfo is just 
QTShell with one additional source code file (QTInfo.c) and 
some additional resources. Figure 4 shows the Test menu 
supported by QTInfo. 


Test 


Set Preview to Selection 

381 

Set Selection to Preview 

382 

Clear Preview 

383 

Play Preview 

384 

Go To Poster Frame 

885 

Set Poster Frame 

386 

Show Copyright... 

387 

Rdd Full Nome... 

388 

Add Copyright... 

389 

Rdd Information... 

388 


Figure 4: 'the Test menu in Qllnfo 


A s yt >u ca n see. Q r 11 n ft > p rt )v i des L lie "Si it iw Ct ) [ >y rig lit..." 
menu item, as well as a number of other items that allow us 
to gel and set various kinds of movie information, It turns out 
that we can handle the “Show Copyright..." item with a 
single line of code: 

ShowMovtelnlormalion(myMov. gModalFi1terUPP, OL): 

The ShowMovielnformation function was introduced in 
QuickTime version 2.0, but has (to my knowledge) never 


been documented. Show Movie Information simply displays the 
movie information dialog box, which includes the movie 
poster image, the name of the movie, the movie s copyright 
information, and some other information. If you pass a 
universal procedure pointer to a modal dialog event filter 
function in die second parameter, you'll get a movable modal 
dialog box; otherwise, you II get a standard non-movable 
modal dialog box, as shown in Figure 5 



Figure y: A mnt-motwbfe movie information dialog box 

Movie Posters 

A movie poster image (or, more briefly, a movie 
poster) is a single image that represents a QuickTime 
movie. The images in the top-left panes of Figures 1, 2, 
and 5 are movie posters, suitably resized to fit into the 
available space in the movie information dialog box. A 
movie poster is defined by specifying a movie poster time 
and one or more movie poster tracks. The movie poster 
time specifies the time in the movie at which the image is 
to found, and the movie poster tracks specify which tracks 
in the movie are to be used to create the movie poster. 
Typically a single track is used as the movie poster track, 
but in theory two or more video tracks (or other tracks 
with visible data) could contribute to the final movie 
poster image. If a movie has no track designated as a 
movie poster track, then the movie won't have a poster, 
no matter what the movie poster time is set to. Let's see 
how to work with poster limes and tracks. 

Cietting and Setting Movie Poster Times 

The default movie poster time is 0, which picks out the 
first frame in the movie. As we saw earlier it's sometimes 
useful to designate some other time as the movie poster time. 
The function GTInfo SetPosterToFrame. defined in Listing I. 
sets the currently-displayed movie frame to be the movie 
poster image. (Qllnfo c;itls QTinfo_SetPosterToFrame in 
response to the "Set Foster Frame" menu item.) 
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Listing I: Setting the movie poster 
time to the current movie time 


QTI n ft i_Sc1 Post cr'1 bFramc 

OSKj r QTI iifo_Set Post erToFraite 
(Movie tlieMovie, 

HovieControIIet theMC) 

I 

TiroeValue niyTimo: 

Component ftr?sul t myEc r = tioErr ; 

// stop the- movie from p Living 

my Hr r =* MCDoAction (theMC, 
mcActionPiay* (void *)0L); 
if (myErr != noErr) 
goto bail; 

rayTime " (let Mov i eT i roc 
(iheMovIct NULL); 

Sc L Mov ioPotrt erTitne 
(theMovie* nryTime); 

myErr - MCMovieChanged 
(t heMC. theMovie); 

bail: 

return((OSErr)myErr): 

J 


As you can sec, QTlnfo, SetPoslerToFrame 
first tails MGDoAction to set file movie 
play rale to 0, which effectively stops the 
movie from playing, (If the movie is 
already stopped, this call has no effect.) 
Then QTInfoJSetPosterToFrame retrieves 
the current movie time by calling the 
GetMovieTime function and sets the movie 
poster time to the current movie time by 
calling the SetMoviePosterTime function. 

GTlnfo SetPosterToFrame finishes up 
by calling the MCMovieChanged function, 
which informs the movie controller that 
we’ve made changes to the movie using 
the Movie Toolbox* As weVe seen in past 
articles, there are often two ways to 
change some characteristic of a movie: 
using Movie Toolbox functions and using 
movie coni roller functions. When a movie 
is associated with a movie controller and 
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when we make a change to the movie 
using the Movie Toolbox, it’s usually 
necessary to keep tilings in sync by 
calling MCMovieChanged, For example, if 
we change the size of tire movie by 
calling SetMovieBox, we’d need to call 
MCMovieChanged so that the movie 
controller can update itself appropriately. 

hi the present case, there is no movie 
controller action to set the poster frame, so 
we used rhe Movie Toolbox function 
SelMoviePosterTime. Then we called 
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MCMovieChanged on the offhand chance that the movie 
controller might actually at re about tine poster time. I’ve tried 
running QTTnfo without the call Lo MCMovieChanged here and 
no harm appears to result, but it's letter to be safe than sorry, 
As a general rule, if you have a movie controller associated 
with a movie anti you use the Movie Toolbox to effect some 
change in the movie, call MCMovieChanged to inform the movie 
controller of the change. 

QTInfo supports the “Go To Poster Frame” menu item, 
which sets the current movie time to the movie poster time. 
Listing 2 defines the QTInfo J3oToPoster Frame function, which 
does just that. 

Listing 2: Setting the current movie time to the movie 
poster time 

<ynntb_GolaPo5tcrFi , amc 

OSBrr CJTin£(?_GoToPosterFrame (Movie theMovie„ 

MovieControllar th^MC) 

t 

TimeRecord myTiBiGRecord: 

Component Result myHrr — noErr; 

// stop the movie from playing 

rayErr - MGDoAction(theMC, mcActionPlay. (void *)0L): 
if (myErr noErr) 

goto bail; 

// sci up a lime record with the desired movie time, scale, and base 
myTimeRecord . value * hi ** 0; 
myTSmcRecord.value,lo 

GetMoviePosterTinie (theMovie); 
myTimeReeord.base - GelMovieTimeBase(iheKovie); 
myTimeRecord .scale = GetMovi eTi meSr.a 1 e (theMovie) : 

rayErr ~ MCDoActionftheMC. mcActionGoToTltne, 
RmyTimeRecord ); 

ball: 

return((OSErrImyErr}; 

1 

In this case, there is a movie controller action that we can 
use to set the current movie time, namely mcAcfionGoToTime. 
As a result, there is no need ro call MCMovieChanged after 
we’ve made this change to the movie (since we made the 
change using movie controller actions, not the Movie 
Toolbox). We did of course use Movie Toolbox functions to 
get information needed to fill in the TimeRecord structure 
whose address we pass to MCOoAction, but those functions 
didn’t make any changes to the movie; they simply gave us 
information about the movie. 

Working w ith Movie Poster Tracks 

1 mentioned earlier that a movie’s poster image is 
determined both by the movie poster time and by the 
movie poster tracks. Each track in a movie has a track 
usage , which indicates whether the track is used in the 
movie, the movie poster, the movie preview, or any 
combination of these. For instance, a movie can include a 
video track that consists of a single frame, and that track 
can be the only one in ihe movie that is used in the movie 
poster. In tilts way, it T s possible to have a movie poster 


that is not simply one of the frames in the movie, hm is 
some other image altogether. 

We can query a Lrack’s usage by calling the 
GetTrackUsage function. GetTrackUsage returns a long integer 
whose bits encode the track usage. Currently, these Uiree bits 
are defined: 

emim I 

trackUsagelnMovie “1 I . 

trackUsagelnFreview ■ 1 << 2 * 

trackllsagelnPoeter - 1 << 3 

) ; 

By default, a track can be used in any of these three 
ways, so calling GetTrackUsage on most tracks will return a 
value of GxOQQOOOOE (that is, binary 1110). But we can 
change this default setting by calling SetTrackUsage, 

passing ii a long integer that has the appropriate Bags set 
or clear. We’ll see some calls to GetTrackUsage and 
SetTrackUsage in a moment. For now , ifs important to 
understand that a track usage value indicates a track's 
potential use, not its actual use. That is to say, if a 
particular track has a track usage value with the 
trackU sage In Poster flag set, the poster image might not 
actually include any data from that track. This might 
happen if the movie poster time is set to a lime at which 
that track has no data (perhaps the track offset is greater 
than the movie poster time). Similarly, a track's usage value 
can have the trackUsagelnPreview llag set, even if the movie 
has no preview. To repeat, the track usage determines the 
uses a track can have, not Lite uses it actually has. 

Let’s see how this works in practice. When QTTnfo 
wants to adjust the stale of its menus, it needs to know 
whether the movie in the frontmost window has a poster 
image. If there is no poster image, then it should disable 
the “Go 7b Foster Frame" menu item. To determine 
whether a movie has a poster image, QTInfo calls the 
QTJnfo_MovieHasPoster function defined in Listing 3. 
Essentially, QTInfo MovieHasPoster looks at each track in 
the movie, retrieves the track’s usage value, and checks to 
see whether the trackUsagelnPoster flag is set in that 
value. If there is at least one track that is capable of 
contributing data to the movie poster image, we’ll happily 
count the movie as having a poster image. 

Listing 3: Determining whether a movie has a 
poster image 

Q IT n fo_Mo vicHasPoster 

Boolean QTlnfo_MovieHaflPoster (Movie theMovie) 

I 

long myCoum = 0L; 

lon g my Index " 0L; 

Track myTrack - NULL; 

long myusage * QL: 

Boolean myHasPoster - true: 

// make svirc that some track is used in the movie poster 

myCount = CetMovieTrackCount (ttieMovie) : 

fur (mylndex = 1; mylndcx myCount: ary tndex++) I 
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myTr'ack ** GeiMoviel ndTrack (LhcMovie . my Index) ; 
iT (myTrack = NULL) 
continue: 

myUsage ^ GetTrackUsagafniyTrack) : 
if (myUsage & trsekUsagelraPosteir) 
break: 

// we found a track with the trackll sage In Paster flag set; break out of the loop 

I 

if CrayIndex > myCount) 
myHasPoster - false: 

// we went Ihru all tracks without Hading one with a poster usage 

return(myHasPoster); 

I 

The QTInfo_MovieHasPoster function is instructive for 
other reasons as well, in particular because it shows how to 
iterate through all tracks in a movie. As you can see, it begins 
by calling the GetMovieTrackCount function to determine how 
many tracks the specified movie contains. Then ii repeatedly 
calls the GetMovielndTrack function to get a Lrack identifier for 
each of those tracks. Hie Movie Toolbox also supplies the 
GetMovielndTrackType function, which allows us to iterate 
through all tracks of a specific type (say, all video tracks). We 
won't have occasion to use GetMovielndTrackType in this 
article, but we will in the future. 

Movie Previews 

A movie preview is a short, dynamic representation of 
a QuickTime movie. Typically, a movie preview is an 
excerpt of the movie itself (for example, the first few 
seconds of the movie). But, like a movie poster, a movie 
preview can consist of data ihat is not used in the normal 
playback of the movie. Once again, the usage values of 
the tracks in the movie determine the actual contents of 
the movie preview. 

Defining Movie Previews 

We specify a movie preview by giving its start time, 
its duration, and its tracks. The recommended duration is 
about 3 to 5 seconds, but you are free to use a longer or 
shorter duration if you wish. An easy way to let the user 
specify a movie preview is to provide the “Set Preview to 
Selection” menu item, which uses the start time and 
duration of the current movie selection as the start time 
and duration of the movie preview, l isting 4 shows how 
to set the movie preview to the current movie selection. 

Listing 4; Setting the movie preview to the current 
movie selection 


O] WojSetPrc vie wlbSdeciiOfl 

QSErr QTInio_SetPreviewToSelection (Movie theMovie, 

MovieController 

theMC) 

I 

TimeValue myStart; 

TlmeValiie tny Du ration; 

Comp dlJtmt Result myKrr - noErr; 


Ge LMovieSeiection (theMqvie . kinyStart . &myDuratl 0 n) ; 
SetMovieFreviewTime(theMovie. myStart. myDuration); 

myErr — MCMovieCh&n&ed(theMC, theMovie); 

return(iOSErrJmyErr); 

I 

The QTInfa_SetPreviewToSdeGtion function is simplicity itself. 
We just call GetMovieSelection to get the current movie start 
time and duraLion, and then we pass those same values to 
the SetMoviePreviewTime function. We need to call 
MCMovieC hanged here because we changed the 
characteristics of the movie (in particular, iLs movie preview) 
using the Movie Toolbox, 

As weve seen, QTlnfo also provides the “Set Selection 
to Preview" menu item, which sets Lhe movies selection to 
the current movie preview. Listing 5 defines the function 
GTInfo^SetSetectionToPreview, which performs this operation. 

Listing 5: Setting the current movie selection to the 
movie preview 7 

QTI nfo_St rSdeef ionToFrevte w 

QSErr QTIjifo_SetSeIectionToFreview (Movie rheMovie, 

MovieController tbeMC) 

\ 

TimeValue myStart; 

TimeValue myDuration: 

ComponentResult myErr = noErri 
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GetMoviei J review f rinie{theMovit;, fcmySt&ru femytiura L Lon) : 
SenMovieSelection (theMovis . myStEiEt, myDuralion) ; 

myErr = MCMovieChan^edCtheMC. theMovIe); 

returnC(OSErr)myErr): 


We need to enable or disable the "Set Preview to 
Selection” and “Set Selection to Preview” menu items, 
depending on whether a movie has a selection or preview. 
IPs easy to determine whether a movie has a selection: we 
can simply call GetMovieSelection and check to see whether 
the duration returned to us Ls greater than 0, like this: 

GetMov f eS^lection (myMovie, feniyStart, femyDuration) : 
my lias Select ion ” (myDurat l fin > 0): 


But it’s a bit more complicated to determine whether a movie 
has a movie preview. We need to check to see both whether 
the movie lias a non-zero movie preview duration and 
whether any tracks in the movie are used in the movie 
preview. Listing 6 defines ihe QTInfo_MovieHasPrevtew 
function, which performs both of these checks. As you can 
see, QTInfo MovieHasPreview is very similar to 
GTinfo_MovieHasPoster (Listing 3). 

Listing 6; Determining whether a movie has a preview. 


QTJnfo_M(ivk:L lasPrvvicw 


Boolean QTInfo MovieHasPreview (Movie theMovie) 
t 


T1meVa1ue 

■rime Value 

long 

long 

Track 

long 

Boolean 


myStart: 
myOu rat loti; 
myCount = OL: 
myIndex - GL: 
myTrack = NULL: 

mytlsage = OL: 
myHaaPrevlev - false: 


// sec it the movie tuis a posit ive preview duration 

GelMov 1 ePrev i cwTi me (I lieMov I c . ferny St art , femyDurat ton) : 
If tiny Duration > 0) 
myHasBreview = true: 

// niiike sure i\vM some Lrack is used in the movie preview 
myCount = GetMovieTrackCount(theMovie): 
for (mylndex = 1: mylndex myCount: mylndexf+) { 
myTrack = fietMovieln-dTrar-k (theMovfe. mylndex) : 
if (myTrack — MULL) 
continue; 


myUaage = CetTrackUsage(myTrack); 
if (myUsage fe trackUsagelnPraviev) 
break; 

// wc found j track with the track Usage In Preview flag set; break out of the loop 

\ 


if (myindex > myCount) 
myltaal 1 review = false: 

// we went thru all tracks without finding one with a preview usage 
return (myftasPreviev) : 


Playing Movie Previews 

Tlie Movie Toolbox provides an easy way to show the 
user the exact contents of a movie preview. We can call the 
PlayMoviePreview function, like this: 

F J la y Mo v 1<?P rev i ew (my Mo v i e , NIJIX, OL) ; 

When we execute Play Movie Preview, the Movie Toolbox 
puts our movie into preview mode, plays the movie 
preview in the movie’s graphics port, and then sets the 
movie back into normal playback mode. When the movie 
returns to normal playback mode, the current movie time is 
set to the end of the movie preview. 

The second parameter to Play Movie Preview is a 
universal procedure pointer to a movie callout function, 
which the Movie Toolbox calls repeatedly while the 
preview is playing. We might use a movie callout function 
to provide a way for the user to stop the preview from 
playing (perhaps by checking the event queue for some 
particular key press). If we don't use a movie callout 
function, then the call to PlayMoviePreview is essentially 
synchronous; no other events will be processed until the 
movie preview finishes playing. 

The Movie Toolbox provides a way to play a movie 
preview without blocking other processing. We can call 
SetMoviePreviewMode with its second parameter set to true 
to put a particular movie into preview mode. 
SetMovtePreviewMode restricts the active segment of the 
movie to the segment of the movie picked out by the 
preview’s start time and duration; \\ also restricts the 
active iracks to those that have the IrackUsagelnPreview 
flag set in their track usage values. Once a movie has 
been set into preview mode, we can start it and stop it by 
trailing the StartMovie and StopMovie functions. To exit 
movie preview mode, we can call SetMoviePreviewMode 
with its second parameter set to false. (Note that QTInfo 
does not illustrate this method of playing movie previews; 
it calls PlayMoviePreview.) 

Clearing Movie Previews 

Sometimes its useful to dear a movie preview from a 
movie. We can do this by selling both the staff time and 
duration of the movie preview to 0, like this: 

SetMoviePreviewTime(tkeMoviu, G t 0): 

Executing this line alone effectively prevents any movie 
preview from being displayed. But we also want to 
perform a few other actions. For one thing, we should 
remove any tracks from the movie that are used only in 
the movie preview. We can do this by examining rite track 
usage value for each track in the movie and, if the usage 
value indicates that a track is used in the movie preview 
but not in the movie or the movie poster, calling 
DisposeMovieTrack to remove the track from the movie, 
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Also, once we’ve removed any tracks that were used 
only in the movie preview, we should go back through the 
remaining tracks and reset their track usage values so that 
they can be used as pan of a movie preview, if one is 
subsequently added. If we don't do this, the user might he 
unable to create a new movie preview, since it's possible 
that none of the remaining tracks in the movie lias the 
trackUsagelnPreview flag set in its track usage value. 

listing 7 defines the GTInfo_ClearPreview function, which 
performs all three of these actions* 

Listing 7: Clearing a movie preview 


I Info CkarPtv v i iw 

OSKrr QTlnfo„ClearPreview (Movie theMovle. 

MovieCotitroller theMC) 

I 

lonR my Count ” OL: 

long my Index * OL; 

Track myTrack “ NULL: 

long iny Usage = OLr 

ComponentResult myErr = noErt: 

// set ihr movie preview M;irt time and duration to 0 

SetHovlePtevieVTime(theHovie. 0* 0): 

// amove all tracks that an* used ‘only* in the movie pa view 

myCount ™ GetWovieTrackCotmt (theHovie) ; 
for fmyIndex - my Count; mylndex >- 1; mylndex-) 1 
myTrack - GetMovieIndTrack(theMovie. mylndex): 

If (myTrack “ NULL) 
continue: 



Figure 6; A poster contained in afite-ofxming dialog box 

And then Lake a lcx>k at Figure 7, which shows yet another 
file-opening dialog lx>x. 



Figure 7: A description contained in a 
Jile-ofmung dialog box 


myllsa ge ” Get T r a c k Usa ge (my Truck): 

myttsagf* S” I t nrkthisj ge 1 riMovie | trackUsagelnPreview 

| trackUsagelnPeeter: 
i f (mylinage =“ t rscktlsagelnPreview) 
DisposeMovieTracklmyTrack) ; 


// add tnickt IsagdnPaview lo any remaining tracks that are in the movie 
// (so that subsequently setting the preview to u seleeiion will include 
// (hest j tracks) 

my Co Li n I = GelMovieTrackCount(theHovie): 
for (my index = 1: mytndex <- my Count; mylndex++) I 
myTrack « GetMovielndTrackCtheMovi e. mylndox); 
if (myTrack — NULL) 
continue: 


I 


myUnage = GertTrackUsage(myTrack): 
if (mytjflage ^ t rackUsagelnMovie) 

SetTruekUaage(myTrack. myUsage | 

trackUsagelnPreview); 


myErr ~ MCMovieChangsd(theMC. IheMnvte); 
return((OSKr r)myKrr); 


Fru. Previews 

Now consider this question: when we call 
StandardGetFilePreview (or NavGetFile with the preview 
pane enabled), what is displayed in the preview section 
of the file-opening dialog box? Before you answer, take a 
look back at Figure 5 I suspect you're inclined to say 
that it's tiie movie preview. But before you make that 
your final answer, take a look at Figure 6. which shows 
another file-opening dialog box. 


Thoroughly confused? I thought so. 

The correct answer to our little quiz is that the preview 
displayed in a file-opening dialog box is what’s called a file 
previetlK which is any information dial gives die user an idea 
of what’s in the file. As we’ve seen, the file preview can Ixj a 
movie poster or a movie preview f if the file is a movie file) or 
any other data that describes or represents the file : On 
Macintosh computers, the default file preview for a QuickTime 
movie file is a miniature version of the movie pewter frame, 
while on Windows computers it’s the first 10 seconds of the 
movie. But we are free to specify some other information as 
the file preview, if we so desire, let’s see how file previews 
are stored and created, to make this all perhaps a bit dearer. 

Accessing File Previews 

On Macintosh computers, when StandardGetFilePreview or 
NavGetFile needs to display a file preview for a QuickTime 
movie file, it first checks to see whether the file is a double¬ 
fork or stngie-fork movie file. If the selected file is a double- 
fork movie file. StandardGetFilePreview or NavGetFile looks in 
the resource fork for a resource of type pnof. The data in a 
pnof resource is organized as a preview resource record\ 
which is defined in ImageCompression.h like iliis: 

struct PrevievResourccEeeord 1 

unsigned long uiodllate; 

shorL version: 

OSType resType: 

short resID; 

\ ; 
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The res Type and resID fields specify the type and ID 
of some other resource, which contains the actual file 
preview data or which itself indicates where to find that 
data. (Let's call that other resource die preview da fa 
resource.) For instance, if resType and resID pick out a 
resource of type *PICT\ then the picture in ihat resource 
will he used as the file preview (as in Figure 6). Similarly, 
if resType and resID pick out a resource of type + TEXT . 
then the text in that resource will be used as the file 
preview (as in Figure 7). If resType and resID pick out a 
resource of type ‘moov\ then llie movie preview start time 
and duration specified in that resource will be used to 
pick out the file preview (as in Figure 3) If there is no 
movie resource in the resource fork, then resID should be 
set to -1 (QxFFFF), which tells StandardGetFilePreview lo 
use the movie preview whose start time and duration are 
stored in the movie atom in the File's data fork. 

In single-fork movie files, there is no resource fork. 
So StandardGetFife Preview opens rhe data fork and looks 
for an atom of type 4 pnot\ which it interprets in the same 
way as a pnof resource, with one small difference; the 
resID field is interpreted as a I-based index of atom types 
in the movie file. For example, if Lite resType field in the 
■pnot’ atom in a single-fork movie file is PICT' and the 
resID field is I, then StandardGetFilePreview looks for the 
first atom in that file of type ‘PICT', which it then uses as 
the file preview. 

There are a couple of "gotchas” here that you should 
be aware of. First, the NavGetFile function currently seems 
to work only with file previews specified by pnot’ 
resources. If you're creating single-fork movie files (as I 
have recommended), don’t expect them to have file 
previews in ihe file-opening dialog boxes displayed by 
NavGetFile. Worse yet. NavGetFile doesn’t seem to know 
how to handle movie previews as file previews, even in 
double-fork movie files. Finally, StandardGetFilePreview 
doesn’t seem to know how to handle movie previews as 
file previews when stored in single-fork movies. (At least, 

1 haven't been able to gel them lo work.) Our strategy 
below will be to create single-fork movie files with ‘pnof 
atoms in the format that is publicly documented. Then 
well just have to wail until StandardGetFilePreview and 
NavGetFile lo catch up to us (as I expect they will), 

(By the way, you might he wondering why file preview 
resources and atoms have the type pnot’. The p’ of course is 
for "preview’; but what’s the not’ all about? The constant 
assigned to the component that displays file previews is of 
no help in deciphering this: 

enum I 

ShowFilePreviewComponentType — 

FOUR CHAR CODEC pnot*) 

I : 

Fm told, by a knowledgeable source, that early versions of 
the QuickTime software — prior to version 1.0 — contained 
a preview component that wasn’t very good. When the 
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replacement was written, it was given the type pnot as an 
abbreviation for "Preview? Not!") 

Creating File Previews 

Ideally, wexl like the QuickTime movie files that we create 
to have file previews, so that Ihe user can get a reasonable idea 
of what’s in those files when they appear in the list of files In 
the file-opening dialog lx>x. The Image Compression Manager 
provides the MakeFilePreview function, which we can u.se to 
create? file previews. Inside Macintosh recommends calling 
MakeFilePreview whenever we save a movie file. So we can 
insert a call to MakeFilePreview in the two functions 
QTFrameJJpdateMovieFile and QTFrame SaveAs Movie File Ux>th 
in the file Com Framework, c) which handle the ‘^Save" and ‘Save 
As” menu commands; 

MakeFllePreview (rayRefNum, (lCHProgreasProcReccirdPt-r) *1); 

MakeFilePreview sets the file preview for the file 
specified by the my Ref Mum parameter to be the current 
movie preview, if one exists: if the movie does not have 
a movie preview', then MakeFilePreview creates a 
thumbnail version of the movie poster image and sets it 
to l>e the file preview. (A thumbnail is a small copy of an 
image, typically 80 pixels on the longer side.) If we warn 
la create a file preview' using some other type of data (for 
instance, text data), we can call the ICM function 
AddFHePreview. which allows us to specify the type of 
data we want to use. 
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But there is one big problem here: MakeFilePreview 
and AddFilePreview always add the file preview 
information to the movie file’s resource fork. Indeed, 
MakeFilePreview and AddFilePreview will go so far as to 
create a resource fork for the movie file if it doesn't 
already have one, so that they have a place to put the file 
preview they create. Needless lo say, this behavior is 
going to wreak havoc with our desire to create only 
single-fork movie files. So, however tempting it might be 
to use MakeFilePreview to create our file previews, we're 
just going to have to resist that temptation. 

In short, QuickTime does not currently provide any 
API to add a file preview Lo a single-fork movie tile. But 
based on what we learned above about the way file 
previews are stored m single-fork files and on what we 
learned in the previous article about the general structure 
of QuickTime movie files, it won't be loo hard for us to 
do this ourselves, For, we know 1 that a single-fork movie 
file is just a collection of atoms. And a file preview can be 
stored in a single-fork movie as an atom of type pnot' 
together with a preview data atom that holds the actual 
preview dam. So all we really need to do is append an 
atom or two to a single-fork movie file, Figure 8 shows a 
single-fork movie file with no file preview (Lop) and that 
same file wilh a file preview (bottom). Well define a 
function QTInfo_ Make File Preview that we can use to turn 
the top file into the bottom file. 




V 

movie atom 

jr 

movie data 


moo v 

data 

mdat 




Figure 8: A single-fork movie file before 
and after adding a file preview 


GTInfo_MakeFilePreview is declared like tills: 

OSErr QTInfo_MakeFilePreview (Movie theHovie, 
short theRefNum, ICMProgressProcRecorriPTr 
theProgressProc) 

As you can see, QTInfo_Make File Preview has the same 
parameters as MakeFilePreview, except that we also pass ihe 
movie identifier to GTInfoJVlakeFilePreview The second 
parameter to QTI n fo_M a ke File Preview is the file reference 
numter of the open movie file. If QTlnfo_MakeFifePreview is 
passed a reference to a resource fork, then it can just call 
MakeFilePreview to add the required preview resources to 
that resource fork, like this: 

if (QTInfo IsRefNumGfReanurceFurk(UieRefNum)) I 

myErr - MakoFilePreviewt theRefNiim. theProgressFroe) : 
goto ball; 

1 


But if QTInfo_MakeFilePreview is passed the file reference 
number of a data fork, then we ll assume that we must add 
the file preview information to the data fork. This involves 
adding a pnot' atom to the data fork, as well as a preview 
data atom. Recall that an atom consists of an atom header 
and some atom data. For a pnot' atom, the atom data is a 
record of type PreviewResourceRecord. So we can construct 
the pnot’ atom like this: 

PreviewRt*stmreeRecord myPNOTRecord: 

unts i gne d long ray At ornHe a d e r [ 2 ] T //an alum header 

// fill in the prim'atom header 

rayAtomK&adef fO 1 " EndianU32_NtnB(s1 sseof (myAt otnHeader) + 

siaeof(myPNOTRecord))I 

myAtomHeader[1] - 

KndianU32_NLoMShoi*rFilf!PreviewComponentType) ; 

// fill in ihe pnoT atom data 

GetDateTime(SrayMadDate); 

myPNOTRecord.modDate = End i anU12_NvoR(myModI>atc) ; 
myPNOTRecord-vers ton * EndIanSlb_NtoB(OJ: 
myPNOTRecord.resType = EndianU32_NtoB(myPreviewType); 
myPNOTRecord * reail) = EndianSl 6_NtoB {1) : 

Ail data in predefined QuickTime movie atoms must be 
in big-endian format, so here we use the macros 
EndianU32_MtoB and EndianS16 NtoB Lo convert from the 
computer's native-endian format into big-endian format. 

Notice that the reslype field is set to myPreviewType. We ll 
create a file preview that is either a movie preview or a 
movie poster thumbnail, depending on whether the movie 
has a movie preview: 

I f (QTInfo_Movie lla sPreview(t heKovie)) 
myPreviewType *= MovieAID: 
else 

myPreviewType - kQTFileTypePicture; 

The next thing we need lo do is write Lhc pnot' atom 
data onto the end of the movie file. We can use the File 
Manager functions Get EOF. Set EOF. SetFPos. and FS Write to 
do this. See Listing 8 lielow for the exact steps involved in 
writing the data into the file. 

Now we need lo wriLe ihe actual preview data into an 
atom of the appropriate type. For a movie preview, we can 
just |>oini to the moov' atom, which contains the start time 
and duration of the movie preview. For a file preview that 
contains a thumbnail of the movie poster frame, we need to 
retrieve the movie poster frame, create a thumbnail image 
from it, and write the atom onto the end of the movie file. 
We can call GetMovie Poster Piet to gel the movie poster image: 

myPicture = GetMovicPosturPIcl(iheMovie) ; 

Then we can call the fCM function MakeThumbnailFromPicture 
to reduce the poster image to a thumbnail image: 

my Thumb nail - (PieHandle) NewHand 1 ntll ear (4) : 
myErr - MakeThumbna11 From?lclure(myFir Lure, 0, 
royThumbnaU , 

theFrogressProt:) ; 

If MakeThumbnailFrom Picture successfully creates the 
thumbnail image, we need lo fill in an atom header anti wriie 
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// Like most Mac developers, 

// I easily spend 12 hours a day 

// staring at line after line of C+ + code in tiny, 9 point Monaco. 

// Sometimes it makes my eyes feet like they're on fire. 

( 

So the last thing I need is some 
fuzzy monitor that adds to my headaches. 

I 



/,„**** begin excitement ***”*/ 

// That's why I'm so jazzed about this SGI monitor. 

// Its ultra-high resolution = 1600 x 1024 and dpi = no, 

H giving me razor-sharp contrast. 

// And the high refresh rate is 
// perfect for poring through lines of code. 

// At first, I was amazed at the clarity, the fine details that emerged. 

{ 

ft wa<i (ike seeing things for the firat time. 

} 

// Later, though, I learned to appreciate the wide aspect ratio 16:10j. 

// with a generous 17.3 inches of viewing area. SGI’s 1600 SW 
// lets me have all my documents viewable at once, and it's 
// a flat panel so it fits on my desk with room to spare. 


// From the moment I saw this thing I was hooked. You will be, too. 

\ 

Especially when you find out 
how affordable it is. 

// Check it out 


/****** end excitement •*•***/ 



www.sgi.com/flatpan 
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ihe header anti thumbnail data into the movie file as an atom 
of type PICT . like this: 

myAtomHeadet[0] = EndianU32_NtoB (aizftof (myALomilender) + 
Get Hand leSize ({Ha n d 1 e)myThmnbnai 1)) : 
myAtomlleader [1J - End,iantJ32_NtoB(myFieviewType) ; 

// write the atom header into the file 

mySize - sizeof (myAtomHeader) : 

myErr = FSWrite(theRefNum* kraySize, myAtomHeader) ; 
it' (myErr = noKrr) I 

// write the atom data into the file 

my Size * GetllandleSize ((Handle} myThumbna 11) ; 

myEri - FSWrite(theRefNum. Smygize, ‘myThumbnail); 


listing 8 brings all of this together into a single function 
dial writes the appropriate file preview inio the resource fork 
or the data fork, depending on the kind of file reference 
number passed to it in the second parameter. 


Listing 8; Creating a file preview 


H I | nfo_M ukc FilePreview 

GSErr QTInfo MakeFileFroview (Movie theMovio, 
short theRefNum. ICMFrogressProcRecordPtr 
theProgressProc) 
t 

unsigned long myModDale; 

PreviewResoucceRecord myPNOTReeord; 
long my EOF: 

long mySize; 

unsigned long myAtomHeade r 12 I ;// an atom header 

QSTypet myPteviewType; 

OSErr myErr ~ noErr; 

// determine whether IheRcfNnm is a file reference number of a data fork 
or 

// a resource fork: if it's a resource fork, then well just call the ex 3 siing 
ICM function 

// MakeFilePreview 

if (QTTn ro_lsRefWumOfResourceFnrk ftheRefNum)) I 
tnyfiri = MflkfiFilePreviewttheRefNum, 
theProgressProc): 
goto bail: 


// if the movie has a movie preview, use that as the file preview; 
otherwise use 

// a thumbnail of the movie poster frame as the file preview 

If fQTTnfo_MovieHas Preview (theMovie)) 
myPrevlewType « MovieAID; 
else 

myPreviewType - kQTFt1oTypePicture: 

// construct the l pnof atom; fill in die ‘pmA'atom header 

myAtomHearfpr[0] = 

EndianU 32 NtoB[uizeof{myAtomHeader) + 

n i 7, eo f (myFNGTRe co rd) ) ; 

myAtomlleader 11 j - t * 

EndianU32_NtoB(ShowFi1 rP r oviewCumponentType); 

// fill in the l pnot’ atom data 

GotDaneTi mp {&myModDate) ; 

royPNOTReeurd . modDate = EndianU37_NloB(myModDate); 
myPNQTReeord . version ~ End isnS ] 6_NtoB(Q) ; 

my PNOTReco rd , r esType = 

EndianU32_NtoB (myPrev j ovTyps); 

myPNOTRecord.resTD - EndianS16_NtoB{1); 

// write the pnof atom at the end of the data fork 

// get the current logical end-of-file and extend it bv the desired amount 
myErr = GetEOF(theRefNum, &myEQF); 

If (myErr (- noErr) 


goto bail; 

myErr = SetEOF(theRefNum, 

my EOF + size.of (myALanLlleader) + 
sizeof (myPNQTKeeord)) ; 

if (myErr 1 = noErr) 
goto bail; 

// set the file mark 

myErr « SetFFos (theRefNum . f fiFroruSlcrt, myEGF) : 

Lf (myErr 1= noErr) 
goto bail: 

// write the atom header into the file 

mySize = size® f {myAtomlleader) ; 

myErr = FSWr I te( LheRefNuzi* &mySize> niyAtomHcader); 

if (myErr !- noErr) 
goto bail: 

// write the atom data into the file 

mySize - sizeof (tny PNOTReco rd); 

myErr - F£Write(theRofWim* &mySize, &myPNOTReeord): 

if (myErr != rtoKrr) 
goto ball; 

// write the preview data atom at the end of the data fork 

if (myPreviewType M MovieATD) [ 

// the pilot'atom refers to the existing moov'atom 
// so no other preview data atom is required 


if (myFrevl cwType — kQTFileTypePieture) | 

PicHandle myPicture = NULL; 

PieUundlp myThumbnai1 = NULL; 


// get the [>oster frame picture 

myPicture = GetMoviePosterFicC(theMovie); 
if CmyPieture I" NULL) [ 

// create a thumbnail 

my Thu mb nail = {Picllandle) NewHand 1 oCl car (4) ; 
if (myThumbnail 1 - NULL) I 

myErr - MakfiThtnnbna U FromPicture (myPieture , 0, 
myThumbnaii, 

theProgressProc); 

if (myErr “ noErr) \ 
myAt omlieader [0J = 

EndianU3 2 JftoB(sizeof(myAtomMmader) 


GetHandieSize((Handle)myThumbnaii)); 

m yAt omHeader[1] = 

EndianU32_NtoB(rnyPrev5 ewType) : 

// write the atom header into the file 

my S i z e = oizeof (myAt o mHe a ri or'); 
myErr = FSWrite(theRefNum. SmySize* 
myAtomHendcr); 

if (myErr ™ noErr) ( 

// write tile atom data into the file 

mySize = 

GetHandieSize((Handle)myThumbnaii): 

myErr = FSWtite(theRefNum. &mySize, 

‘myThumbnaii); 

I 

Kill Pic tore (myTlvumbrut II); 


KillPIcture(myPicture) ; 

I 

J 

bail: 

return(myErr): 


I should point out that QTinfoJVIakeFilePreview is not 
terribly smart about adding file previews to single-fork 
files. In particular, QTtnfo_MakeFdePreview doesn’t bother 
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to check whether I he movie file already contains a pnot 
atom. Instead, it simply appends a new pnot 1 atom and its 
associated preview data atom to Lhe file. One consequence 
of this is that each time the user changes any aspect of the 
movie and saves it, a new thumbnail is appended to the 
movie file; but that thumbnail might never be used, since 
Stan dardGetFilo Preview will always find the first pnot 1 a Lorn 
and the first preview data atom. In the next article, we’ll 
address this issue and see how to replace an existing pnot' 
atom and its associated preview- data atom. 

Movie Annotations 

A QuickTime movie file can include zero or more movie 
annotations, which provide descriptive information about 
the movie contained in the file. For example, movie 
annotations can indicate the names of the performers in the 
movie, the software that was used to create the movie, the 
names of the movie’s writer and director, general information 
about the movie, and so forth. The header file Movies.h 
defines over two dozen kinds of movie annotations. For the 
present, we ll he concerned with only three of them, picked 
out by these constants: 

enum I 

kUserDataTextFuilNarne = FOUR CHAR CODE ( ©nam*) . 

kU s e r DflUsT fix t G o p y r i ght = FOUR CHAR CODE (*€>cpy *) , 

kUfie rDataTextlnf ormation “ FOUR CHAR CQDE{'©inf *) 

1 

These are the three movie annotations that appear in the 
movie information dialog box displayed by the 
ShowMovielnformation function (see Figure 2). What we 
want to do now is show how to add these three kinds of 
movie annotations to a QuickTime movie file; or, if a 
movie file already contains annotations of these sorts, we 
want to show how to edit those annotations. Well handle 
both of these tasks by displaying an Edit Annotation dialog 
box that contains an editable text field in which lhe user 
can add or edit an annotation* For example, if the user 
selects “Add Information..." in the lest menu of QTinfo 
hut the front most movie has no information annotation, 
well display the dialog box shown in Figure 9 



Figure 9: Q Jlnfo s Edit Annotation dialog box 

As you might have guessed from the constants listed 
above, a movie annotation is stored in a QuickTime movie 


Cross-Platform C++ 

PP2MFC puts your 
PowerPiant 
applications on 
Windows* 

www.oofile.com.au 


file as a piece of movie user data. We’ve already worked a 
liiile with the GetMovieUserData. GetUserDataltem, and 
SetUserDataltem functions for getting and setting a piece of a 
movies user data (see “Movie Controller Potpourri” in 
MucTech, February 2000). Because the data for a movie 
annotation is always text data, here well use the 
GetUserDataText and AddUserDataText functions, which are 
specialized versions of GetUserDataltem and SetUserDataltem. 

When the user selects one of our three menu items for 
adding or editing a movie annotation, QTinfo executes the 
GTInfo_EditAnnotation function, passing il a movie identifier 
and the type of annotation to add or edit. For instance, if the 
user selects the “Add Information.,.” item, QTinfo executes 
this block of txxie: 

case 111M_ADI1_INF0RMATI0N: 

my1s C ha n ged = QTinfo_Edit Anno t a tion(my Movie, 

kU s e rE at &T ext Info lunation) : 

if (mylsChanged) 

(*‘rnyWindowObject).flsDirty = true; 
mytsflandled “ true: 
break: 

In lhe GTInfo_EditAnnotalion function, we need to display the 
Edit Annotation dialog box, put the current movie annotation 
of the selected kind (if one exists) into the editable text field, 
allow the user to alter the annotation as desired, and then — 
if the user clicks the OK button — retrieve the new or edited 
annotation and attach it to the movie file as a piece of movie 
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Programmers! 


Code Warrior Professional! 5 put everything you need for 
software development at your fingertips: project management 
tools, text and resource editors, source and class browsers, 
compilers, linkers, assemblers, and debugger.Release 5 offers 
such features as RAD for Java, tester compile times, local and 
remote application debugging, IDE extensibility options and 
even tighter C/C + + compliance. Additionally, you can create 
applications for Windows 95/98/NT and Mac OS 3.x and Mac 
OS X from either host platform, (available in versions hosted on 
Mac or Windows). 


Whether you're a developer of high-end, complex applications, 
simpler utilities, shareware/freeware an IS manager or an ISP 
who needs to distribute files quickly and easily, the new 
Installer Maker is the complete Installation solution for you. 
Utilizing the power or the new StuffU Engine, Installer Maker 
creates installers faster and smaller than ever, decreasing 
download time off servers and reducing the number of disks 
needed to distribute installers. These time and cost savings go 
straight to your bottom line! 


Spotlight is the first Macintosh “Automatic Debugger" It can 
automatically locate run time errors in your code and display 
the offending source code fine. Unlike similar tools on other 
platforms Spotlight is easy to use. No source code changes 
are necessary for application debugging Spot light can 
automatically check for wild pointers, memory leaks, 
overwrites, underwrites, invalid dereferencing of handles, and 
even toolbox parameter validity checking spotlight knows 
Macintosh verifying parameters to over 400 toolbox calls. 


VOODOO Server is a version control system for software 
developers using Met rower ks Code Warrior under Mar 05 
VOODOO Server and the corresponding VOODOO clients (the 
included Code Warrior VCS plug in and the VOODOO Admin 
application) are designed to offer reliable and robust version 
control features while minimizing the administrative overhead 
that usually accompanies version control. If you're a single 
programmer or managing a team of developers, version control 
can make or break your project Do if right, with VOODOO 
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for Macintosh. Relied upon by thousands of Mac developers, 
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easier, faster, and safer editing of Macintosh data files and 
resources. Whether you have to parse a picture, debug a data fork, 
design and try out Balloon Help, create a scripting dictionary, create 
anti-aliased icons, design and edit a custom resource with 40,000 
fields in it, create C source code to run a dialog, or any of hundreds 
of other resource related tasks, Rcsorccref's magic will quickly save 
you time and money. 


One of the most flexible and powerful development 
environments on the Macintosh today! Easily create programs 
with the visual program editor, drop into the BASIC editor to 
define powerful logic with the worlds easiest programming 
language, or work directly with the Marin lash toolbox The 
only BASIC compiler on the market that gives you 100% access 
to ail of the power of the Macintosh toolbox! 
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Monitor tlie bandwidth usage of up to five different machines on your 
network* Do you need to upgrade your Webserver? How hard is your 
eMail server working? Are you getting ell the bandwidth you're 
paying far? Nor only can CyberGange answer ail these questions, 
new features allow CyberGauge to eMail or page your network 
device becomes unresponsive r passes a threshold of usage you 
define an essential first line of defense far early detection of denial 
of service attacks and necessity for warning you and tracking quality 
of ISPs that may have brown outs and shutdowns 


|WebSTAR Server Suite is a complete set of powerful and easy 
to-usc Internet servers far the Mat OS. Effortlessly serve web 
pages, host email accounts, publish databases, and share fifes - 
all with a single application on one Mad WebSTAR Server Suite 
is perfect for Internet or Intranet serving, single or multiple 
sites, small! and large businesses it’s power and ease-of use 
saves any organization time and money. 
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nining server performance arid online effectiveness Funnd 
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ular pages on your site, track server loads & optimize server 
brmanoe, profile visitors based on organization, domain 
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exported from your computer the content itsdf is filtered before 
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»Acid two US8 ports to your older Macintosh, Connect up to 
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[Apple’s new standard far desktop connectivity USB mouse 
[devices, keyboards, joysticks, game controllers, printers, 
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Just plug this keyboard into your Mac and start typing! The 
tUKB 600 keyboard from Macscnsc is designed to get you 
!.typing quickly and easily, wiLhuuL any hassle or compatibility 
: Worries, It lea Lures two lone translucent design, colored to 
[match your favorite flavor nf Macintosh. It. offers soft touch 
with positive tactile feedback and build built in USB port on 
[either side of the keyboard. Indudes a 5 1 USB cable and is 
1100% Macintosh compatible, simply plug and play, as easy 
[as Macintosh! 



Do you need 4 monitors and 4 keyboards far your 4 servers? 
With Dr Bolt Moni-Switch you can connect a single keyboard 
and monitor to up to 4 machines at once! A simple flick of a 
switch directs the video input and keyboard command's to the 
appropriate CPU! Available in USB and ADB models, with 2 
or 4 machine support, and bundles with USB PC! cards so 
you can mix and match USB and ADB machines with the 
same Moni-Switch! Great for programmers to do back 
ground compiles, ideal lor server rooms overcrowded with 
monitors and keyboards! 
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ing to get your whole office online without shelling out 
■ousartds of dollars? If so, the XRouter Internet Sharing 
Hub offers the perfect solution. This amazing Ethernet to 
Ethernet hub connects an entire network of up to 252 users 
to the Internet using only one ISP account and one Cable or 
DSL modem! 








































user data. Lei's consider each of these steps. 


Creating the Edit Annotation Dialog Box 

Our Edit An no La Lion dialog box contains four items, as 
shown in the ResEdit version of our dialog item list CD ITU) 
resource depicted in Figure to. 


□ ~ tilTI ID = 54ft from Mmflpplitatmn.rm © 




tarcceUj | QK Lij 


Figure 10: The dialog Hem list for the 
Edit Annotation dialog box 

To be honest, 1 must admit dial 1 simply "borrowed” this item 
list from the resource fork of the QuickTime Player 
application (and 1 was even too lazy to renumber it). To refer 
to the items in this dialog box, we’ll define these constants: 


kEditTextResourceID 548 

^define kEditTextltemOK 1 

^define kEditTextItemCancel 2 

^define kEditTextItemEditEox 3 

#define kEditTextltemEditLabel 4 


Our resource fork also contains a DLOG resource of the 
same ID (again "borrowed 11 from QuickTime Player) that uses 
this dialog item list. We can open the Edit Annotation dialog 
box. therefore, by executing this code; 

tnyDialog = CetNewDialog(kEditTextResgurceID. NULL. 

(WindowFtr)-IL); 


The dialog box is initially invisible, so that we have an 
opportunity to configure it before displaying it on the screen. 
For instance, we want to sei bosh ihe default button (which is 
outlined in bold and activated when the user types the Return 
or Enter key) and the cancel button (which is activated when 
the user types the Escape key or rhe Command-period key 
combination). We can do this as follows: 

So Lfri a 1 ogOe f a ill Li Lem{ inyfrial og. kEditTex LI temOK) ; 
SetDialdgCancelitem(myDialog, kEditTextItemCancel); 


Next, we want to set the static text item (item 4) to 
indicate which type of movie annotation is being added or 
edited. I’ve added a resource of type STR#' that contains 
three strings, one for each of the types of movie annotation 
that QITnfc can handle. Well use these constants to access 
those strings: 


^define k'l'exiKindaReaaurcelD 2000 

#define kTextKindsFullName 1 

^define kTextKindsCopyright 2 

^define kTextKindsInforraation 3 


We ll simply retrieve one of these strings from that resource, 
according to the type of annotation that GTInfo_EditAnnotation 
is asked lo handle, as shown in Listing 9- 

Listing 9: Setting the label for a movie annotation 

QTl n lh_Rli t A tx notsir ft >n 


// get ;i string for the specified annotation type 
switch (theType) I 

case kUserDataTextFullName: 

GetlndStringtmyString. kTextKindsResourcelD* 

kTextKindsFullName); 

break; 


case kUserDataTextCopyr1ght: 

Get IndStringCtnySt ring, kTextKindsftesourcelD, 

kTextKindsCopyright): 

break: 


1 


case kUserDatalextlnformation; 

GetIndString(myString t kTextKindaResourealD. 

kTextKlndsInformation) : 

break; 


GetDialogItam(myDialog. kEditTextltemEditLabel, 
&myItemKind T 

kmyltemHandie. 

kiriyltemRect) : 

SeLTHal ogl temText (my It emHand le , my St ring) ; 


As you can see, we call GetDialogltem to get a handle to 
the static text item and SetDiatogltemText to set the string as 
the text of that item. 

Showing the Current Annotation 

We also want to call SetDialogltemText to set the 
current annotation, if one exists, as the text of the 
editable text item. First, however, we need Lo find the 
current annotation of the specified type. As mentioned 
earlier, well use the GetUserDataText function to do this. 
GetUserDataText reads the movie annotation of a specified 
type from a user data item list, which we first obtain by 
calling GetMovieUserData. like this: 

myUserData * GetMovieUserData(theMovie); 

GetUserDataText returns the requested information in a 
handle, which it resizes as necessary to exactly hold the text. 
So we can retrieve the current movie annotation of the 
desired type using code like this: 

myHapdle - NevHandleCiear(4) : 

If {myHandle \ = NULL) ! 

myErr = GetUserDataText (rtyUserDaf a, 

myHandle, theType, 1 T 
Ge tScriptManagerVarisb 1 e (sinRegionCode)); 

// some lines omitted here 

\ 

The final parameter passed to GetUserDataText is a region 
code , which specifies a version of a written language of a 
particular region in the world. IUs possible to have several 
movie annotations of the same type, which differ only in 
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their region code — that is to say, their language. Here 
we're using the Script Manager function 
GetScriptManagerVariabie to get the region code associated 
with the user’s current script system. 

Once we've called GetUserDataText to get the current 
annotation of Lhe specified type, we need to copy the text 
in myHandte into a Pascal string. That’s because 
SetDialogltemText takes a Pascal string as a parameter, not 
a handle. We can use the function 
GTInfo TextHandleToPString. defined in Listing 10, to make 
this conversion. 

Listing 1.0: Copying text from a 
handle Into a Pascal string 

QTl n foJTextHandleToPStfi ng 

void QTlnfo_TextHandleToFString (Handle theHandle, 

5tr255 theString) 

( 

short myConnt■ 

myCount ™ Getlfe ndl e.S i ze. [ theHand le) : 

II (my Co Lin L > 255) 
myCount = 255: 

theString[Dj - my Count; 

BlockMoveData( * theHandle. &(theString[ 1 ]), myCount); 
i 

So now we are finally ready to insert the existing 
annotation into the Edit Annotation dialog box. We can do 
this with ihese two lines of code; 

Ge LlHalugl tem{ my Dialog. kEdit Textl LernEdi LBox , 

&myl temKind. 
&myItemHandle. &myItemKect); 
SetDialogltemText(myltemH&ndle. myString): 

The last thing we need to do before displaying the dialog 
box to tine user is set the current selection range of tine 
annotation text When QuickTime Player displays its Edit 
Annotation dialog box, it selects all the text in the editable 
text item. Well follow this example by calling 
SelectDialogllomText like this: 

Si I. r l Dialog! t cmTox L h»yDialog. kF.rl i I Text TtcmF.d 1 T Box , 0 , 

mySlringfO] ) ; 

At this point, the Edit Annotation dialog box is fully 
configured. Its static text item has been updated to indicate 
which type of movie annotation is being edited, and the 
current annotation of that type has been inserted into the 
editable text item. We can finish up by actually showing 
the dialog box to the user; 

Mac ShowWindow(GetDialogWiiidow(myDialog)): 

Retrieving the Edited Annotation 

We allow the user to interact with the Items In the Edit 


Annotation dialog box by calling ModalDiatog: 

do t 

ModalDialog (gNodalFil terUFF , &myIteio) ; 
t while £ (myltem != JcEditTextltemOK) 

bk (myltero I- kEditTextltemCaneel)); 

As you can see, MocfaiDialog is called continually until the 
user clicks the OK or Cancel button {or types a key or key 
combination that is interpreted as a click on one of those 
buttons). If the user dicks the Cancel button, we should 
just exit the QTInfo EditAnnotatron function after disposing 
of the Edit Annotation dialog box and performing any 
other necessary dean-up. 

if (my t Lem t* kF.d i tTcxi I temOK) 
goto bail; 

But if the user clicks the OK button, we need to retrieve 
the text in the editable text item and set it as the movie 
annotation of the specified type. We can geL the edited text 
like this: 

GetDiaiogltem(myDialog, kEditTextltemEditBox. 
&rnyItemKind , 

&myl tcrnKa ndl e , kruyTtemRect) ; 
GetDialogitemText (myl tamilandle . mySt ring) ; 

We want to call AddUsefOataTexI to insert lhe user's 
edited annotation into the movie user data list. To do this, we 
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first need to convert the Pascal string returned by 
GetDialogltemText into a handle. We can use the 
QTInfo_PStringToTextHandle function, defined in Listing 11, to 
handle this conversion. 

Listing 11; Copying text from a Pascal string into a 
handle 


QTlufo^PStrlng'lbTextl landle 

void QTInfo_PStringToTextHaridle (Str255 theString. 

Handle theHandle) 

t 

Setfland 1 i xe (iheHand 1 e, theStri ng [G]) ; 
if (GetllandleSize{Lhellandle) l- theSt t ing[0] ) 
return; 

BiockMoveData{&(theString[1J). *theHandle, 
theStringLOj); 

} 


Now we are ready to call AddUserDataText: 

myErr — AddUsetDataText(rayUserData. my Handle. thsType, 
1* 

GetScriptManagetVariable(fitnRegionCode)); 


Again, we’re calling GetScriptManagerVariable to get the user's 
current region code, so that the annotation is written into the 
movie file in a form recognizable to the user. Listing 12 
shows the complete function GTInfo_EditAnnotation 

Listing 12: Editing a movie annotation 


Ql l n ff \ Va I it An nt it \ n 


Boolean 

I 


QTInf o_EditAmu>tat ion (Movie 
OSType 


Dialo&Ptr 

short 

short 

GrafFt r 

Nandie 

short 

Handle 

Us^rData 

Rect 

Str255 

Boolean 

DSErr 


myDialog - NULL: 
myltem; 

mySavedResFile; 
tnySavedFort; 

myHandle - NULL; 
my1temKind; 
nay! temllandle: 
myUserData = NULL; 
myltemRect: 
myString: 

mylsChanged = false; 
myErr = noErr: 


theMovie. 
theType) 


// save the current resource file and graphics port 
mySavodReaFile = CurResFileO ; 
CetRort (ianySavedPort) : 


// su the application s resource fik 
UseResFile(gAppResFile); 


ff get i lie movie user data 

myUaerData — GetMovieUscrData(thuMovie); 
if (myUserData “ NULL) 
goto bail; 


MacSetPort CmyDialog); 
tfendif 

SetDi at ogDefaul rTt em(myDialog, kEd i rTe.xtTtemOK) ; 

Set Of a logCanccl i tem(»yS f al og, kEd i i Tex i ItemGance I); 

// get a string for the specified annotation type 
switch (theType) I 

case kU&erDataTextFuilName: 

GetIndString (myString. kTextKindsResourcelD* 
kText Kind s Fill IName) ; 

break; 

case kUserOataTcxtCopytight : 

GetliidString (my St ring , kTexUCindsResourcelU * 
kTextKindsCopyright): 

break; 


I 


case kUserOataTextInformation: 

Get I nd St r ing (mySt. r ing t kTextKindsResourcelD , 
kTnx i K i ndsTnforma L ion); 

break: 


GetDlalog!tern(myDialog, kEditTextItemEditLabel, 

&my ItemKind , fimyltemHandle, 

AmyTtemRect J ; 

SetDfalogTremTexi(my T t. omHand1e. myString); 

U set the current annotation iif the specified type, if it exists 

myllaridle = NewLLandleClear [4) ; 
if (myHandle t— NULL) [ 

myErr - GetlFserDataText (myUserData, myHandle ► 
theType f 1, 

GatSeriptHanagnrVariahle (nntRegiotiCode] ) ; 

If (myErr ” noF.rr) [ 

GTlnIo_TextllandleToPS L r irig (mylland ie , tny String) ; 
GetJUiaiogl tern(myDialog, kEd it Text .1 temEditBox , 
fitmyltemKind, fittnyltemHandle. 

kmyltemRect) : 

SetDialogltetnText (myltemHandle, tnyString) : 
Seleer.Di alogltemText (myDia 1 og, 
kEditTextTtemEd1tRox, 0. 

laiySt ring [0]) ; 

t 


DlsposeHandle(myHandle); 


NarShowWindow(GetDialogWindow(myDialog)); 

// display anti hand I e even is in the dialog box until the user clicks OK or 
(lined 

d u I 

HodalDialog(gModaIFilterUPF. bayItem); 
i while ((myItem !- kEditTextltetnGK) 

&& [myItem != kEditTextItemCancel)): 

// handle the selected button 

IT (rnyTtcni H kEd L lTcxLT temOK) 
goto bail; 

// retrieve the cdiietl lexi 
myHandle - NewHandleClear(4); 
if (myHandle !— NULL) ( 

GetDialogltem (my Dial og. kEd it Text 1 tetnEd itEox, 
fiijnyTtemKind, &myTtemHand.le, 

iufiy I { cmRccL) ; 

GetDialogltemText(myItemHandie, myString): 

QTIn fo_P St ringToTe x tHan die(myString, myHandle); 
myErr - AddUserPataText(myUserData. myHandle, 
theType, 1. 


// create the dialog box in which the user will add or edit the annotation 

tnyDialog = GetNewDialog(kEditTextReKoiirceTD, NULL, 

(WlndowPtr) 1L); 

if (myDialog = NULL) 
goto bail; 

Itlf TARGETJkFI_MAC„CARBON 
SetFortDialogPort(myDialog); 

//else 


GetScripr .ManngerVariable(nmRegfonCode)); 
mylsGhanged “ (myErr noErr); 
Dispaaeiiandle(myHandle) : 

I 

bail; 

// restore the previous resource fiJe and graphics pon 

MacSetPort(mySav^dPorr) ; 
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(IneRenFl 1 e (e&yStf vedKeul^ife) ; 

if (tayBiaiofi 1“ NULL) 
DifiposeDiaioftfmyDiaiog) : 

return (mylsChanged); 


Note that QTInfo.EditAnnotation returns a Boolean value that 
indicates whether the user clicked the OK button and the 
specified movie annotation was successfully updaUxL QTlnfo 
uses that value to determine whether it should mark the movie 
as dirty (anti hence in need of saving). It's possible, however, 
dial the user clicked the OK button without having altered the 
movie annotation in the editable text item. In that case, the 
movie would I \* marked as dirty even though its user data has 
not actually dunged.. 1l would l>e easy to modify 
QTlnfo EditAn notation so that it compares the original annotation 
and rhe annotation later retrieved from the text lx>x to see 
whether they differ Tilts enhancement is left as an exercise for 
the reader, (Its worth noting, however, thaL Lhe lichavior of 
QTlnfo in this regard is identical to that of QuickTime Player. ) 

Conclusion 

in this article, we've learned how to get and set some 
of the information that's stored in a QuickTime movie file. 
We’ve seen how to work with movie posters anti movie 
previews, and weVe seen how to add file previews to 
both double-fork and single-fork QuickTime movie files. 
We still have a little hit of work to do on the 
QTInfo_MakeFilePreview function (which we've deferred 
umil the following article), but already it can write file 
previews into single-fork movie files. 

WeVe also seen how to add annotations to a movie file 
and edit a file's existing annotations. Our sample 
application QTlnfo allows the user to edit any of the three 
kinds of annotations displayed in the movie information 
dialog box. With just a little bit of work, however, the 
QTInfo_EditAnnotation function could lie modified to support 
editing any type of movie annotation. So what weVe got 
are the essential elements of a general-purpose tool for 
adding and changing any text-based movie user data. 

But, as I 1 ve said, we still have some work to do to 
clean up one or two loose ends in this month’s code. Next 
time well see how to find specific atoms in a QuickTime 
movie file. Well also discover another kind of atom 
structure that can be found lurking deep inside 
QuickTime movie files. 


Credits 

Thanks are due to Jim Luther for pointing me in the right 
direction in the QTlnfoJsRGfNumOfResourceFork function (in 
the file GTlnfac) and to Brian Friedkin for clarifying the 
behavior of StandardGetFilePreview under Windows. HLJ 
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By Erick J. Tejkowski 


REALbasic Sprites 


Develop powerful games 
I in minutes 


INTRODUCTION 

Game programming bus long been 
a tradition of highly specialized source 
code, libraries, and programming 
trickery, strictly for ubergeeks* Until 
now* Armed with a copy of REALbasic 
and this article, you will be writing your 
own games in no time at all. 

For high-speed games, it is 
customary for programmers to use 
special code to draw at high speeds 
(often referred to as “blitting" routines). 
This stems from the fact that the native 
drawing routines available in the Mac 
Toolbox are too slow for fust drawing, 
such as that required by animation. 
Beginners will be glad to learn that 
REALbasic has these abilities built in. 
With only a few lines of code, a 
programmer can attain high-speed 
sprite-1 rased animation. Add a lew more 
lines of code and you have a game. 
REALbasic takes care of ail the nasty 
drawing routines behind the scenes and 
lets us focus on the elements of the 
game. This article will demonstrate 
animation and game creation using 
REALbasic sprites. By the end of the 
article, you should lx 1 able to complete 
a small arcade-style game. 


purposes, the free ResEdiL from Apple will do just fine* Create 
a new file and name it “Resources". This is the only name 
REALbasic understands for resource files added directly to 
projects in the IDE, so be sure to spell iL correctly. In this new 
resource file, create three resources of type Tien’ and change 
the ID- to 1280, 1290, and 1300 respectively by selecting the 
Resource:Get Resource Info menu. In den #1280, create a 
graphic for the hero of our game. In eicn #1290, draw an 
adversary. Finally, den #1300 contains a picture of a 
projectile. For this example, we will use an airplane theme. 
By now, you should have something that looks like Figure 1. 



Figure I* I he Sprite Graphics. 


Now that the sprite graphics have been created, save the 
Resources file and start REALbasic. 


Building the Project 

When REALbasic starts, a new project is created 
automatically. Drag the newly created resource file into the 
project. Now, open Windowl and drag a StaticText . a 
Pushbutton , and a Spritesurface control onto the window. The 
StaticText will display the results of the game (i.e. win or lose), 
the Pushbutton will start the game, and the SpriteSurface will 
control all of the animation and game play. Figure 2 shows 
the completed interface. 


Building the Sprites 

Begin the game project by opening 
your favorite resource editor For our 


Erick Tejkowski is still looking for a decent version of Moon Patrol™ for the Mac. You can reach him at cjt@norcom2000,com. 


34 


REALbasic Sprues 


MacTecij * Aug us i 2000 





















Figure 2 The Completed Window! Interface, 


Once the Interface has been built, double click 
Window t to open the Code Editor With the Code Editor 
opened, create the Properties in Listing 1 by selecting New 
Property from the Edit menu* 


listing 1 , Window 1 Properties, 

EadguySpriteUO) as Sprite 
GocdGuySprite as Sprite 
GutiSprite as Sprite 
gunvisible as Boolean 
NumOfBadtruys as Integer 
leftEdge as Integer 
lopKdge as integer 


Sprite properties are pictures that can be controlled by a 
SpriteSurface. We will need 10 sprites representing the 
attacking enemies, one representing the hero, and one used 
for the gunfire that the hero can shoot. The Boolean variable 
gunvisible will allow us to turn the gunfire on and off The 
integer NumOfBadGuys , as one might expect, will keep track 
of the number of BadguySprites remaining. The final lwo 
integer variables (leftEdge and topEdge) will be used to center 
the SpriteSurface on the screen. 

In addition to these properties, create three methods 
named InitSprites, ClearAl[Sprites, and RemakeGun by 
selecting New Method from the Edit menu. The InitSprites 
method will initialize all of the Sprites defined in Listing 1 
Open the Code Editor to the InitSprites method and enter the 
code from Listing 2. 

Listing 2. The InitSprites Method. 

Sub InitSprites{) 
dim p as picture 
dim i as integer 

//in it the #khI guy 

p=app. resoii rceFork. gelcicn 11280 3 

GoodGuySprit c~SpriL eSurface!* ItewSprite(p * 32.3 2) 

GoodGuySpri l u.x=3QQ 
CoodGuySprite, y“435 
GoodGuy S ptite,group w 1 

/fmi the gimfirv 

peapp.resourceFor k.getcirn(I 500) 

GunSpri te^Spr l t.eSurfacel .NowSprite (p.32,323 

GunSpritO.x- 200 

GunSpriie-y=46/ 

GuuSprite.gruup=2 
gu n visa ble”false 

//inil Lhc bad guys. 

p=app. resourceFork, getc icn (1 7.90) 


for l“l to 10 

8adguySpritefi)"SpirireSurfacel .NewSpritefp, 32,32} 

Bad guySp rite(i).x=rnd‘6 00 

BadguySpriteU) .y=rnd‘200-250 

BadguySprite(i).group^i 

next 

NumOfBa if Guy s” 10 
End Sub 


The InitSprites method demonstrates how each of the 
Sprites is created First, the icons created earlier are opened 
into a Picture object. Next, the NcwSprite method of 
SpriteSurface 1 is called, passing the Picture, and Width and 
Height of the Picture as parameters. Once the Sprite has 
been created, its X and Y positions are initialized. The 
SpriteSurface will measure 640x480. so the GoodGuySprite 
will begin life somewhere near the bottom middle of the 
screen. The gunfire starts off as not Inking visible (he. 
gunvisible=fal5e)> so we assign its X post ion somewhere off 
the screen (GunSprite.x=-2Q0k Hirer, when we want it visible 
to the user, we will simply move it to a positive X position* 
The ten BadguySprites will begin at random X positions and 
Y positions somewhere between -250 and -50, making 
them initially invisible. This will change later, however, 
when they move down the screen towards the 
GoodyguySprite. The last thing to notice here is the Group 
property of each of die Sprites. The Group number is used 
for detecting collisions. Sprites with the same Group number 
will not collide with each other Sprites with different Group 
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numbers produce collisions* Now, when we talk about 
producing collisions, what this really means is that the 
Collision Event of I lie SpriteSurface will l>e fired. For now. it 
is sufficient to know that the GunSprite and the BudGuys 
have different Group numbers so that they may collide. 
Furr her, the BatlGuy Sprites have a Group number that is 
different from the GoodguySprite, allowing them to collide. 

Since ail good things must come to an end, we need 
to include some code to destroy everything we have 
created* Open the Code Editor, navigate to the 
ClearAllSprites method, and enter the code in Listing 3 
During the execution of the game, we may need to kill a 
sprite (c.g. when GunSprite and badguySprite collide). 
Therefore, we should not assume that all sprites will 
always be around. This is the reason we check for nil 
status of a sprite before trying to kill it. If we try to kill a 
non-existent sprite, an error will result causing the 
application to crash. 

listing 3- The ClearAIISprites Method. 

Sub ClearAIISprites() 
d [fn l ns integer 
//kill tlx- {tfKJtlgiiySprili: 

if CaodGuySpriteOnll then 
GoodCuySprit e.close 
end it 

//kill the (HiuSpriie 

If GunSpritfcOnil then 
GunSprite.clone 
end if 

//kill ihc BadgmSprte 

for i-l to 10 

if BadguySprite(i) Onil then 

BadguySprite(i).close 

end if 

next 

Bud Sub 

One final auxiliary method to axle is railed RemakeGun. 
This methcxl will allow us to recreate a GunSprite in the 
middle of game play. Although we already created one in 
the InitSprites method, it might be destroyed during game 
play when it collides with a BadguySprite. Open the Code 
Editor window, navigate to the RemakeGun method, and 
enter the code in Listing 4. 

Listing 4, The RemakeGun Method. 

Sub ItomakeGimO 

diiB p us picture 

//Rtniiwlix l he gunfire 

p~app. resourceFork. getc icn (1100) 

GunSprit &“SpriteSu r face1.NevS price C p,3 2 .32 ) 

GunSprite.x=■200 
GunSprite. ^^67 
GunSpr1lc.gronp-2 
g*mvistible“ false 
End Sub 

With the window s properties and methods defined, it 
is lime to add functionality to the various controls. To 
begin, fill the screen with Window! by adding code into 
its Open event. This is really only cosmetic in nature. The 


SpriteSurface will later take over the whole screen 
anyway. This is what the player will see before the game 
begins and in between rounds. 

Sltb Open() 
rae,top^O 
3i€,left“0 

2 ie.width=screcti(0) .width 
3&e.hfct£ht = screfiB(0) .height 
End Sub 

To gel I he game stalled, enter the code in listing 5 into 
the Action Event of PushButtonl, 

listing 3* The Action Event of PushButtonl, 

Sub Action 
ClearAIISprites 
InitSprites 
SpriteSurface!.run 
End Sub 

If any sprites are si ill around from previous games, they 
are cleared by the ClearAIISprites method. Next all of the 
sprites are initialized with InitSprites and the game play 
begins by calling the Run met lux! of SpriteSurface L 

The SpeiteSurface 

At the heart of RKAl.basic sprite animation is the 
SpriteSurface control. It is a bit of an unusual control in 
that it has a dual personality. It acts like a Canvas control 
drawing graphics in a similar fashion, while periodically 
executing code like a Timer. The FrameSpeed property of 
the SpriteSurface is the vale at which the timed functions 
of a SpriteSurface Ore. To calculate the FrameSpeed, 
divide 60 by the desired Frames per second and round up 
to an integer. For example, to achieve a speed SO frames 
per second: 

6CI / 30 « 1 (the Frame Speed) 

A FrameSpeed of 0 (zero) is the fastest speed at 
which a SpriteSurface can draw, A selling of 1 or 2 is 
typical, depending on speed and complexity required. 
The Run method of SpriteSurfacel was called earlier in ihe 
PushButtonl Action event. This causes the SpriteSurface to 
periodically fire the Next Frame event at the FrameSpeed 
rate urnil the SpriteSurfacel close method is called. As the 
NextFrame event fires, we look at the current conditions 
of all of the sprites and change them if necessary. For 
example, it is in the NextFrame event where we check for 
keys being pressed. If a key is pressed, then some aspect 
of a sprite can be changed (e.g. position). KEALbasic 
takes care of doing all the redrawing for us. We simply tell 
it where to draw. 

Listing 5 shows the NextFrame event of 
SpriteSurfacel. In it. you will notice some other things 
going on. First off, a scoreboard is drawn. The scoreboard 
is simply a string that displays the number of 


36 


HKALmask: Spurns 


MacTeoi • Aun si 2000 







MACTAMK AD ITIM MO,GAO 



•© 


REAL 

REAL 


PEOPLE, 

SUPPORT. 


MacTank provides technical 
support solutions for Macintosh 
application developers. We 
support your end users so you 
have time to concentrate on 
marketing and development. 
Bring your applications to OS X 
from Windows or NeXT and 
we will do the rest, 
yfl 

For pricing and information 
call 877-751-2300, option 2. 





Visit us at www.mactank.com the tech support alternative 


////////// 



BadguySprites remaining. Behind this string is a small blue 
rectangle, which serves the purpose of erasing rhe 
number each time. The color blue is used, because it will 
also be the color of the entire background of the 
SpriteSurface. After redrawing the scoreboard, the code 
checks the keyboard for keys being pressed. It looks at 
the left, right, up, and down arrow keys, as well as the 
space bar. If any of them are depressed, appropriate 
actions are taken. One piece of code specific to the 
GunSprite here is ShootingSound.play, ShootingSound is a 
sound file that lias been dragged into the project window, 
Be sure to make your sounds relatively short, because 
long sounds can Impede smooth animation. Finally the 
BadGuy Sprites are moved. 


listing 5- The SpriteSurfacel NextFrame event. 

Stib NextFraoie (J 
dim i as integer 
//draw die scoreboard 

me.graphics.forecolor=rfcb(G*fi* 100} 

ma.graphics.fitlrect 150+1eftEdge.467+topEdge.40,13 

■e graphics, f or ecolor^rgb (255,255,25.5) 

me.graphics. textfont""Geneva" 

me,graphics.text size^10 

// 1 pul Ik following code .til on one line ! 

pte. graphics, draws* ring "Bad Guys Remainingi “ + 

strfNuinOfBadGuys) * 50+leftEdga. 477+topEdgc 

if me, keyTe?:i 11 23} then //check left arrow key 
//plane moves left 

GoodCuyS p t i. t e. x=GoodGuySp rite. x -1G 

it GoodGuySprite.x<H] then 

GoodGuySprite.x m 2 

end if 

end if 

if tap . keyTc.^ 1(124} t hen //check right ;irn>w kci 
//plane moves right 

GoodCuySp rit a . x^GoodGuySp rit e..x+10 
if GoodGuySprite.xHOO then 
GoodGuySprite.x“5 98 
end if 
end if 

If me . keyTej : r ( 1 2 ft} then //check up a mrnv key 
//plane moves up 

GoodGuy Sp r i t e. y ^GoodtiuySpri te. y - 4 
if CoodGuySprite.yOSO then 
GoodGuySprite.y~35Q 
end if 
end if 

if me. keyTes t (125) then //check down arrow key 
//plane moves down 

GoorfGuySpri tc. y=GoodGuySprite ,y+4 

if GoodGuySpi:ite.y>435 then 

Go0dGuySptite.y-43S 

end if 

end if 

if me, keyTest £49) then //fife=spaccbar 

//six hii the gun 

ShootingSound * play 

if gunviaible^faise then 

//fair the gunfire position here 

GunSprite.x“Go*dGuySprite,xi12 

GunSprite.y-GoodGuySprire.y 

gunvislble =t true 

end if 

end If 

//now check the position of gun only if its turned on 
if gunvisibie^true then 
GunSprite. yKhmSprite.y-30 
//if the gun has reached the top of the screen 
//liide it again ami turn it off 


if GunSprite. y<Q then 
GunSprite.x & -200 
GunSprite.y=447 
gimvi s i b 1 e=f a 1 s e 
end if 
end if 

//advance the badguys 

for i-1 to 10 

//this is the speed of descent (increase for faster movement ) 

BadguySprite (i). y=BadguySprite fi]. 5 

//if w e have reached the bottom of the screen 
//go back up to the top at some random x position 

If BadguySprin?(l).y>447 then 
BadguySpri tc(l) .x=rnd*bQ0 
BadguySpriteU) <y=40 
end if 
next 

End Sub 

So far, this code will produce a nice animation where the 
GoodguySprile can navigate and shoot at the approaching 
BadguySprites. 

SprtteSurface Collisions 

When a GunSprite hits a BadguySprite, nothing 
happens yet. Nor will anything occur if the BadguySprite 
manages to mn into the GoodguySprite. This is the 
function of the SpriteSurfacel Collision Event. Listing 6 
details the code for the SpriteSurtace's Collision Event. This 
is where the Sprite Group numbers from earlier in this 
article become important. The Collision Event of a 
Sprite Surface is automatically passed the Group numbers of 
the sprites that have collided. In the event, we simply 
check to see which two sprites have collided and then 
take some action. In Litis example, we will only look at two 
types of collisions — both the GunSprite and BadguySprite 
have collided or the GoodguySprile anti BadguySprite have 
collided. If the GunSprite has collided with a BadguySprite, 
then we close both of the sprites (in effect “killing* them), 
play a sound, decrease the number of NumOfBadGuy s 
variable, and call RemakeGun for the next time a user fires 
the gun. We must also check to see if all of the 
BadguySprites have been killed. If so, then the game is over 
and the player has won. Finally, if a BadguySprite has 
managed to collide with the Good guy Sprite then the game 
is over and the player has lost. 

Listing 6. The Collision Event of SpriteSurfacel . 

Sub Collision (si as Sprite* as Sprite) 

//(UmSpriie and BadguySprite have collided 

il si,groups2 and s2,group“! then 
BadCuyCraskSound.play 
si.close 
s2.close 

RemakeGun // since we killed the gun sprite, init it again 

Nu cnO f B ad Guy s^HunrOf Ba d Gu y s 1 
if NumOf BadGuy s**Q thou 
si.close 
s2,close 

spritesurfacel.close 
Statictextl.text jfc "You Vinl" 

CheeringSaimd.play 
end if 
end if 
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//GixxIgitySpritt* and HatlguySpriTc have collided 

if s1*group-1 and a2.group=3 then 
si * c lose 
s2.close 

spritesurfacel.close 
Starictextl. text^You Lose!" 

GoodGuyCrashSound.play 
end if 
End Sob 

To spite tilings up a little, it is often desirable lo draw 
a background behind the game. The SpriteSurfaee 
background is broken up into a grid of 64x64 squares. 
The PaintTiie event takes care of refreshing these 
background tiles. To fill the background with a solid blue 
color, enter this code into the PaintTiie event of 
Sprites urfaceb 

Sub PalirtTf'le £g as Graphics, xpos as Integer. ypos as 
Integer ) 

g. forecolor=rgb(0,0,100) 
gpfillrect 0*0.64*64 
End Sub 


References 

* REALmac games 
http://www.realrrtacsxo.uk 

An excellent resource for REALbasie game code anti examples. 

* REALbasie I lie Definitive Guide. Neuberg, Matt, \W). O'Reilly. 
A standard reference tor REALbasie programmers from 
newbie to advanced. H presents a nice example of an object- 
oriented sprite game and detailed instructions for REALbasie 
sprite programming. 

* Zune Software 

http://redrival.com/zurre2ofTware/ 

Example games and code. 

* REAL RPG 

http://hotre.earthlink.net/~dathenous/ 

REALbasie code site specializing in RPG games. 


Keep in mind that any standard graphics drawing can 
take place in the PaintTiie event. 

The final step is to add some code to the Open event 
of SpriteSurfaee 1. like the Windowl Open event code, this 
code is strictly cosmetic. It has been adopted from code 
by Matt Neuberg in his book REALbasie: The Definitive 
Guide. Ir centers SpriteSurfaee 1 on the screen. 

Sub Qpent) 

leftEdge - (Screen(G).width - 640] \ 2 

topEdge - (Screen{0}.height - 4S0) \ 2 

me.ffttrfaceleft = l&ftEdge \ ((640-me.ssurfacewidth) \ 2} 

me . siirfacfitop^topEdg.fi 

End Sub 


Having completed the code, it is time to test the 
finished application. Select DehugdUm menu. Click 
Pushbutton 1 and play the game, if something goes 
wrong, recheck your code for accuracy and make sure 
that you have added all of the necessary auxiliary files 
(the resource file and the sound files), ff all else fails, you 
can download the finished source code from MacTech s 
web site. 


Conclusions 

In !his article, we took a brief look at Sprites in 
REALbasie by constructing a game. The game could be 
upgraded in a number of ways. Hopefully, this article gives 
you some basic background about how to make some of 
these changes yourself. If you would like more information 
about game development on the Macintosh particularly with 
regard to REALbasie, be certain to check the Reference 
section at the end of this arLicle. 


* REALbasie Arcade Game Project 

http ://members. tripod, u I fanjorda n/tndex, h tml 

Source Code for a Lunar Linder game, 

* REALbasie MontJilv 

http://www.nd,edu/-jvanderk/rbm/8-98/index,html 
Introductory REALbasie sprite tutorial. 
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By Chris Stasny 


HTML Rendering with FutureBASIC A 3 


How to write a simple 
HTML Browser with 
Futu reBASICAS 


East Meets South 
W e bn cl been dealing with our 
Japanese distributors for about six years 
when their head honcho asked for a 
face-to-face. It's true that Thelma and I 
enjoy n life of bliss in our double wide, 
but ! wasn't sure how these foreigners 
would take to a genuine Mississippi 
abode* They would have to 
circumnavigate several junk cars to 
reach the front door They would have 
to sleep with o\ Blue and a half dozen 
of his Ilea-bit ten companions who hold 
the existing claim to our guest bed. After 
a brief emailed discussion of 
accommodations, we decided in meet in 
a neutral country: California. 

There was a second introduction 
stacked in the Tarot cards, but this one 
was binary. I was prodded into action 
when I discovered that the in-box had 
been overrun with requests for some 
method of displaying HTML code. And 
both of those emails were strongly 
worded] It was time for... Drum roll,.. 
Use deep voice, ♦♦ * Future BASIC meets 
the HTML Reticle rer. ” 

'the first step was to locate 
documentation of the new manager. 
Apple's only documentation seems to be 


a terse little reference called HTML_Rendering Li b.pdf. A quick 
search of the hard drive turned up another necessary 
component. It is an extension called HTMLRenderingLib, which 
seems to work well in both Systems S.x and 9- U took me 
more than an hour to locate the carbon library on a monthly 
SDK CD that contained information on the constants and 
toolboxes. Another few minutes were required for converting 
the code from C to FRA3. These converted toolbox calls arc- 
now placed in a file named Ttbx HTML Rendering, Inc I and can 
be found at stazsoftware.com, on the Release 3 CD, or with 
electronic versions of this publication. The routines are 
accessed by your program with the following line of code: 

INCLUDE “Tlbx HTML Rendering* Incl* 1 


When Cultures Collide 

The whole thing about meeting those foreigners had me 
on pins and needles, My first faux pas came when they 
introduced themselves and handed me business cards, They 
do this by holding the card in both hands and bowing slightly 
when it is presented. 1 could tell right off that this was a big 
deal and i was anxious not to appear uncouth, (These guys 
were really couth ,) I hastily extracted a card from my wallet 
and smoothed it out against my jeans, (This had the added 
benefit of wiping away some dirt and a few- non-descript 
chicken parts that had adhered to the card,) 1 scratched out 
Buhha's Seafood and Shoe Repair then carefully printed my 
name. 1 bowed and presented it to that foreign guy. Please 
note here that things did not work out exactly as I had 
envisioned. ! am loath to admit it, but I believe that a recently 
consumed six pack of Bud may have been responsible for my 
falling against him and knocking down the entire Japanese 
contingent like a row of carefully placed dominoes. 

Tlie thought of working with the new HTML Rendering 
library had me on edge too. 1 soon discovered that a few 
simple toolbox calls would do the work for me. To simplify 
this example program* 1 decided to use the FutureBASIC II 


The only things that Chris Stasny (a.k.a. The STAZ) enjoys more than sitting on the front porch of his trailer are programming 
his Mac and finding a good place to spit. lit 1 has several commercial products under his ample I well which include Classroom 
Publisher, FutureBASIC and Red Neck Publisher You can reach the STAZ tech team at tech@stazsortware.com or visit their 
web site at www,stazstiftsvare.com. 
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runtime (one of ihe many runtimes available under ihe 
Command menu). This allowed me to prune window, menu, 
and event handling so that the example could concentrate on 
the concepts of HTML rendering. The entire code set (sans 
remarks and white space) is just over 100 lines. It was written 
to work with almost any preference setting, but you will 
need to uncheck Toolboxes require “CALL” in the preferences 
window and make sure that you compile in PPG. (This 
particular set of routines does not include 68K inline code.) 
The program operates from a single window and contains a 
small set of glohals, 

BEGIN GLOBALS 

DIM AS LONG gliKre f // heaviIy used IIR referenoc 

DIM AS LONG @gPort& // means don't use register 
DIM gResizeFlag H bool: window will be resized 

DIM gQuit If flag stiys iCs Lime to terminate 

END GLOBALS 

Program brcviLy may be contributed to the fact that we 
use only one window. Its pointer is held in gPort&, For non- 
Fliers: You don’t have to type class variables in FumreBASIG, 
1 1 rough you can if you desire. There is no necessity for 
setting separate variables for a grafport and a window 
pointer, as they are (in System 9 and earlier) the same 
address. Another obvious difference from other languages is 
that a local function does not have to return a result. Even if 


it does return something, the caller does not have to accept 
tile result. This makes for a bulletproof environment. 

Almost every operation involving the HTML rendering 
library requires an HTML Rendering (HR) reference number. 
We start with a single gHRref and use it for the duration. The 
only remaining glohals are two flags that indicate when to 
resize ihe rendering area and when to quit the application. 

FN MStnmrett 

Three utility functions handle most of the work. The first 
sets the rectangle of the rendering area based on the size of 
the grafport. This is called when a window is resized and 
when the window is initially created. 

r 

This routine sets the si/v of ilic fi t. ML 
rendering reel so lliat it fils in the 
current grafport. 

V 

LOCAL 

DIM AS RECT letiderRoet 
DIM t?rr 

LOCAL m setHTMLrect 
gResizeFiag = _false 
renderRect * @gPart&.portRect% 

OFFSETRECT{renderRect f 1*0) 

INSETRECT(renderRect,0.-1) 

err ~ FN HR Set RenderiogRet? (gHEref .render Reft ) 

END m 


FUNNELWEB 
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Intelligent Web site Monitoring and Analysis Software 


Speed, intuitive user interface, accuracy and in-depth analysis have always made 
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Because of automatic colorization and things not used in 
the formatting of code for this publication, you will see a 
significant difference in appearance (though not in content) 
between the printed code and the screen version* 



The Editor Window. 


In FB A 3, bookmarks are visible tines instead of obscure 
selection ranges. Indention and capitalization are automatic. 
Font, size, style, capitalization, and lore/background colors are 
user selectable for remarks, bookmarks, keywords, toolbox 
calls, quoted strings, constants and more. There are several 
ways of sorting the function menu and you may command- 
double-click a word to be transported to its definition, 


FN shuwLucafUKL 

The most important routine calls the toolbox rendering 
library and handles necessary set up. In FN showLocalURL, we 
insure that the library is available, creaLe the new lilt 
reference, and open the file specified by name and volume 
reference number. Note that ihis particular example works 
on local files rather than web based files. This lends itself 
more readily to building HTML based help systems and 
handling local tests of a web site before uploading, I tested 
the project by opening a local copy of the STAZ web site and 
navigating hither and yon. Amazingly, clicking mail links 
launched my email program. Clicking links to remote 
locations opened the Netscape browser and took me to the 
site. If you wish to work from downloaded wch pages 
instead of local files, you will need to review FN HRGoToURL 

r 

Check lo see if rendering is available. 

Create a new HR reference. 

Build a file spec to an HTML file. 

Render the file. 

7 

LOCAL 

DIM spec AS fssspec 
DIM err.wTitle$ 


LOCAL FN showLocalURL(theURLS,vRef %) 

LONG IF FN MKTMLRend e ringL ibAvai table 

LONG IF gHRref = 0 

i?rr " FN HRNewRcfcrcnee (gfiRref 
_kJlKKendererliTML32Type 
gPortSd 

FN setllTMLrect 
END IF 

LONG IF FN FSMAKEFSSPEC(vftefft,ft»thettRL$ t spec) = tioErr 
LONG IF FN HRGoToFiie( B HRref,»|tee. f _Felse f - 
_KTrue) - _noErr 

LONG IF FN HRGct Ti L1 e (gllRr ef, wTit le$) - _noEct 
SETWT1TLE tgFu tL& *wTItle$) 

END IF 
END IF 
END IF 
END IF 
END FN 


FN termioate 


A final library call performs the simple task of dosing 
down the l ilt reference. It is called when the application 
quits. 

r 

On exit, dispose of the HR reference 
7 

LOCAL 
DIM err 

LOCAL FN terminate 

err = FN HRDi fiposeReferenee fglTRrcf) 

END FN 


Tins Is My Gift to You 

Excuse my digression. Only moments ago, we were 
deeply involved in the rale of an important business meeting. 
During the Iasi episode, the hero’s (that would he me) 
denim-clad torses was sprawled across a pile of tailored 
Japanese suits. They declined my offer to help them back to 
a standing position and proceeded with the next part of 
eastern culture where we exchanged gifts. They presented a 
towel thing that had a bunch of that funny looking writing 
and a small collapsible fan. I wiped sw r eat from my brow, 
fanned myself, (to show appreciation) and donned a very 
large grin with a very small number of teeth It was then that 
I realized 1 was not in possession of a reciprocating gift, 

I had to think fast - like the time that Thelma found me 
in the barn with.., (Never mind, til save that for another 
article.) Anyhow, luck was with me because J had just 
emptied and flattened a perfectly good spit cup prior lo the 
meeting. I turned around, removed it from my shin pocket, 
and stretched it back out. I did a perfect military about face 
in accordance with the pomp and circumstance of the 
occasion. (Unfortunately, the aforementioned six pack 
caused me to turn a lot farther than 180 degrees and took a 
significant number of liny liLtle baby steps to realign,) l 
bowed, and presented the head guy with a slightly used (but 
still perfectly good) spit cup. 


[nit Routines 
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The many runtimes of F13A3 are a gift that we 
programmers may accept without reciprocation. 1 mentioned 
earlier ihat I used the FRIT emulation for this project. It 
allowed me to build and maintain a window with a single 
line of code. My total set is held in this simple fragment; 

r 

I nit Everything 
V 

,_rileMeriiJ * 3 

EECIK EMUM 1 
_open2tein 
„quitltem 
END ENUM 

MENU J I'leKenuVO le^FHe* 

MENU _r \ 1 eMemi,_CFpenTrein,_enab1e, "Open/CF 
MENU _£ ileMemi , _qui LI Lem. _enabli?, Th Qui ij Q M 

WINDOW 1 
GET?0RT(gPort4) 


Dialog Routines 


The next task involves event handling. The program 
accepts the default behaviors for most user interaction, but 
process a few window message items specific to this type of 
application. During update events, a region is created and 
HRdraw is used to redraw the rendered area. When the 
window is activated or deactivated, HRactlvate and 
HRdeactivate are called into action. When the window is 
dosed, the gQuit Boolean is set and when it is about to be 
resized, gResizeFlag is set, 

r 

Handle window refresh, activate, deactivate, 
grow, and close. 

7 

LOCAL 

DIM act * cef* err 
LOCAL FN doDialog 
act - DIALOG(O) 
ref = BIALOG(act) 

SELECT act 

CASE _wndRefresh //update 

DIM rgnfc 

rgnfi. - FN NEWRGN 
tectrgu (rgn&,gPort&. portRectli) 
err = FN HRdraw(gHRref.rgn&) 
nTSPDKF.RGN(rgn&) 

CASE _wndAetivate // aclivatc/dcaclivatc 

LONG IE ref > 0 

err = FN HRactivate(gKRref) 

XELSE 

err = FN HRdsactivate{gKRref) 

END IF 

CASE _wndClose //dose 

gQuii = _z-True 

CASE _preview // grow 

LONG IF ref ” _preWndGrow 
gResizeFlag, = zTrue 
END IF 
END SELECT 

END FN 

FN doLvcm 


The HR library is intelligent enough to handle its own 
events. We pass these through a raw event vector which 
receives events before FRA 3 acts upon them, 

r 

Handle raw events before FB has a 
opportunity to process them 

7 

LOCAL 
DIM err 

LOCAL FN doEvent 

LONG IF FN HRXsHREvtmt(EVENT) 

% EVENT,0 
XELSE 

IE gResizeFlag THEN FN setHTMLrect 
END TF 
END FN 

FN doMenu 


Menu events are vectored to a single routine. The Quit 
item does nothing more than set a flag. The Open item 
displays a dialog, then vectors to the previously defined FN 
showLoealURL. Two filings are noteworthy. 

Noteworthy thing 1: FRA 3 places variables in registers 
until all registers are used. This is an operation that is 
paramount for RPC speed and is OK until you encounter a 
parameter that is passed as a pointer to a variable. Registers 
are not memory locations and cannot themselves be passed 
as variable addresses. Earlier, we dimensioned @gPort& so 
that we could use GETPQRT(gPorl&) because gPort& is a 
variable that receives information. Similarly, vRef% is 
dimensioned wilh die @ symbol because it is a variable LhaL 
will receive information from the FILES® routine. 

Noteworthy thing 2: Basic users normally use the LEN 
function to determine the length of a string. In FRA 3 ? y OU rnay 
look at any character in a string by wrapping lls offset in 
brackets. The use of fName$[0] accomplishes the same thing as 
LEN by extracting the length byte from a Pascal string, 

r 

Handle menu events 
7 

LOCAL 

DIM rName$ 

DIM <®vReT% 

LOCAL EN doMenu 

LONG IF HENU (_ntenulD) = _fileMerm 
SELECT MENU(_iteraID) 

CASE openItem 

fNatneS = FILES${ fOpen, "TEXT" ,, vRef%) 

LONG TF fNameSlO] 

EN showLocu1URL( rNameS . vRefUi) 

END IF 

CASE _quitltem 
gQuit = zTrue 

END SELECT 

END TF 
MENU 
END FN 


Event Loop 

The final code fragment sets up vectors for those events 
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OpenBase 


that interest us, then falls into the event loop. 


r 

1 Event loop 

7 


ON DIALOG FN dodialog 
ON EVENT FN dnEvent 
ON MENU FN dotfemi 

DO 

RANDLEEVENTS 
UNTIL gOuit 

FN terminate 


A Lean, Mean Rendering Machine 

I tested the axle toy opening the index page in my local 
copy of a we to site. The rendering was dean and generally 
fast* though background patterns seem to be imaged a hit 
slower in Apple’s library than in Netscape's. Nevertheless* 
the rendering was exact. No pictures disappeared* No text or 
formatting was lost. Clicking a graphic or link worked just as 
it would in Netscape, i had never dreamed that the 
functionality of a browser could be reduced to a few lines of 
code just as I never dreamed that meeting a few guys from 
ilie other side of the pond would be so unnerving. 



Screen Shot of l B^i Simple Browser. 

We have put on the blinders and walked a straight and 
simple path to the completion of this project. And while it is 
not your Fathers Oldsmobrowser. it is certainly an exciting 
start into untested waters. Good luck in your quest, HQ 
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By Boh Boons! ra, Westford , MA 


Longest Word Soft 

This month's problem puts a twist on a well-known computing 
problem, the common text sort Your Challenge is to sort a block of 
text into ascending or descending order. Yawn.,., Except that the 
comparison function used to do the sort is a little unusual.... 

The prototype for the axle you should write is: 

void LongestWordSort{ 

char 4 textToSqrt. /* the text to bt* sorted 7 

long numChars * /* the length of the tee in bytes 7 

Boolean descending > t son at desccndii^ order if ime 7 

Boolean c a seSen si t i v e t son is case sensitive if true 7 

>; 


The textToSort provided to your LongestWordSort routine 
consists of a sequence of lines of text, each terminated by a 
return character (OxOD). You are to son the lines of text in 
place into either ascending nr descending order, based on the 
value of the descending flag, considering the text as either 
case sensitive or not case sensitive, based on the caseSensitive 
flag. The twist is that the primary sort criterion is the length 
of the words in the line, regardless of the position of the 
word in the line. 

Words are a sequence of alphanumeric characters, 
separated by anything else (spaces, punctuation, etc.). A line 
with a longest word of N characters is considered to be 
“greater” than any line with a longest word of fewer 
characters. Among lines with longest words of the same 
length, ihe sort order is based on the length of the next- 
longest word, and so on. Finally, among lines with words of 
exactly the same length, the sort order is based on text order 
of the individual words, compared in order of length, and 
then in order of occurrence. 

As an example, the following two lines have the same 
length pattern, with each containing two 5-letter words and 

one 3-letter word: 

the quick foxes 
early birds vin 

Sorted in ascending order, the second line is smaller, 
based on a comparison of “early” and “quick”. 

The text may include non-alphanu meric characters, 
which should ge ignored for purposes of comparison. 

This will be a native PowerPC Challenge, using the 
Code Warrior Pro 5 environment. Solutions may be coded in 
C t C++, or Pascal This month, we’ll also allow solutions that 
arc completely or partially coded in assembly language. The 
winner will be the solution that correctly sorts a number of 
blocks of text in the least amount of execution time. 

This problem w'as suggested by Ernst Mtimer, who earns 
two Challenge points for the suggestion. 


Three Months Ago Winner 

The May BigNum Math Challenge required contestants to 
write a collection of numerical routines for very large 
integers, numbers with hundreds of digits or more, well 
beyond what might fit in the memory normally allocated for 
an integer The problem required design of an internal 
representation Tor these big numbers, and creation of routines 
to add, subtract, multiply, and divide them, h also required 
code to raise one such number to the power of another, and 
code to calculate the square root of such numbers. And it 
required routines to convert the internal representation back 
and forth from a decimal representation. Congratulations to 
Ernst Muntcr (Kanata, Ontario) for taking first place in the 
BigNum Math Challenge. 

Ernst chose to represent his BigNums as a sequence of 
unsigned 16-bit terms, to ensure that intermediate results fit 
into a 32-bit long word. The multiplication algorithm is 
inspired by an algorithm from Knuth, optimized to maximize 
the use of registers. The exponential ion tests were the most 
computationally intensive; Ernst's solution scans the bits of 
lhe exponent, squaring the intermediate result with each step, 
and optionally multiplying by the base. For conversion back 
to decimal Ernst saves some time by converting to an 
intermediate representation in base 10000, These and other 
functions are well commented in the published code. 

The second place solution by Mark Day was actually 
faster than the winning solution in many of the test cases. 
However, Mark's solution was significantly slower in the 
exponentiation test case, putting it in second place overall. 

The table below lists, fur each of the solutions submitted, 
and the cumulative execution time in milliseconds. It also 
provides the code size, data size, and programming language 
used for each entry. As usual, the number in parentheses after 
the entrant's name is the total number of Challenge pcinLs 
earned in all Challenges prior to this one. 


Name 

Time 

(secs) 

Code 

Size 

Data 

Size 

Lang 

Ernst Mtinter (607) 

1.95 

49012 

452 

C++ 

Mark Day (20) 

4.22 

23HQ0 

162 

c 

Tom Saxton (158) 

65.1 

11700 

196 

C++ 

Wilieke Kicked (88) 

98.63 

13044 

280 

C++ 

Steve Lobosso 

749.06 

41608 

2813 

C++ 

Jonny Taylor 

* 

16216 

3868 

C 
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Top CoNnsiAms 

Listed here are the Top Contestants for the Programmer's 
Challenge, including eveiyone who has accumulated 10 or more 
points during the past two years. The numbers below include points 
awarded over the 24 most recent contests, including points earned 
by this month's entrants. 


Rank Name 

Points 

Rank 

Name Ptiints 

1. Munter, Ernst 

245 

m 

iX)w r ns, Andiuw 

12 

2-vSaxton, Tom 

146 

u. 

Jones. Dennis 

12 

3. Mli u rer. Sd rust iun 

78 

12, 

Day, Marl< 

10 

4, Boring, Randy 

52 

13. 

Duga, Brady 

10 

S. Staarer, Rob 

47 

14. 

KazdvJv Mikjns 

10 

6. Riekerh WtJIukt! 

45 

15. 

He wen, Kevin 

10 

7/laylor; Jonathan 

26 

16. 

Murphy, ACC 

10 

8. Hdlht'ock, JG 

23 

17. 

Selengut, Jared 

10 

9. Brown, Pal 

20 

18. 

Stroui, Joe 

10 


There are three ways to earn points: (1) scoring in the top 5 of 
any Challenge, (2) being the fust person to find a hug In a published 
winning solution or, (3) tang the first person to suggest a Challenge 
that I use. The points you ran win are: 


1st place 

20 points 

2nd place 

10 points 

3rd place 

7 points 

4tli place 

\ points 

5th place 

2 points 

finding bug 

2 jxjints 

suggesting Challenge 

2 points 


Here is Ernsts w inning RigNum Math solution: 

Bignumcp 
Copyright © 2000 
Ernst Munter 

r 

" RigNum Math" 

Version 3.1 

I ask 

Implement :i set of arithmetic function for multkilgte numbers. 

The design of the big number dam structure is unspecified. 

Dam Structure 

HigNuni Cumuirv. u length field (number of decimal digits required in represent die 
number) and an opaque (void) pointer to a data structure I bve defined a si m pic 
structure lor the internal representation of big numbers: 
struct MyNum | 

unsigned short timil |; b the bin;in representation of the absolute value, 
stored least significant first in unsigned I l^hii chunks. 

Tile size of termiJ is allocated as required by die magnitude of the big number 
unsigned long numTermsAllocatctl; records the number of terms aflocated. 

a sign hit is hidden as the MSB of iunit 1 ennsAUocatctL 
long UstTerm: records the index of ibe liiglicst term actuallv in use* 

I; 

Two special values arc defined for BigNiim: 

- the numeric value of 0 is represented by setting the t%NumData pointer to 0, 
an invalid result teg* divide by 0) Is represented hy Bi^umJengih In Digits = I 


Program Structure 


Hie externally available C functions <k*;vl directly svidi most special cases, and then 
call li function in a layer which allocates MyNum objects and returns a BigNtim. 

II le allocation layer invokes the appropriate arithmetic method on the MyNum 
object to obtain the result which is passed back to the allocation layer. for 
conversion 
into a RigNum 

Conv ersion Algorithms 


OjfTVcfskjns lietwem the decimal digit rq>resentation and the binary representation 
of MyNum ire* done in two stages I he intermediate quasi-dee ima I representation, 
11 ^ MyNum formats, but with terms on a base of 10,000 (Instead tif 65^36). Ihe 
routines with the fragment 1 l0k M in their names participate in dve conversion 
proem 

< i inversion from decknaf to I Ok representation Ls luLrly simple: each four decimal 
digits nuke up one Lttk term. Conversion from 10k to binary is based on the 
expansion 

...(((xjnriDk + x|n-U)*10k + xfii-Jir tUfc ... +xf0b 
evaluated in normal binary aritlunctic 

From hinary we convert Ixtek to the I Ok representation in a similar wav: 

(((y|n|*64K + y[n-l }T(nK + y[n 2f)Yv1K + y|d|, 

Ihii evaluated with hose I Ok arithmetic 

Hie splitting of each I Ok term into i decimal digits Ls then trivial. 

Binary A Hi hmetic Algoridutis 


These are commented in the program 

The dtoice of 16-bii instead of 32-hit terms was primarily mark to have a simple 
way of dealing with carries and with partial products. 

Homing point arithmetic is used in the square root Junction to obtain a quick gtiod 
lirsE estimate from the first few bytes of the input value 

1 imitations 

The ftjwer function is limited to providing results within die memory limitations of 
a practical machine. The smallest possible Siasc (2) to tlie power of the largest 
unsigned lung exponent (about l billion) would result m a number tjf-1 billion bits 
(about J3 hillkwi iligits). Since this alone is be von d the storage capacity (RAM) of 
the target machines, l hove limited die power hi union to exponents w idi at most 32 
bits (binary ). 

Memory for temporary values Ls allocated using ncw[| In the default C++ compiler 
mode. an exception w ill he thrown if memory cannot be allocated, and the program 
will just quit. 

If you expect to run up to your memory limits, and worn to render from tilled 
newt I 

cafls.the program should be modified to either use new with tlte m>_Uirow tjpikm 
and test for null.or employ try \) catchO I) bkxks. 

Version 2 Changes 

A better initial estimate for square roots Ls obtained by exploiting the hill 
power of sqrttdoubie) to operate on up tu ^2 integer hits (instead of just 48), 

A taster multiplier Ls implemented which grows at less than the square law with 
increasing numlxT size. It is based on tlx- observation dial 2 two-digit 
numbers can lx; multiplied with just 3 ikgit multiplications instead of lour, 

Used recursively litis turns nut to be much faster overall, for huge nu mbers even 
thoiigli temporary memory must he allocated and initialized frequently, and some 
adds and subtracts are needed to combine tlx* terms. 

Version 3 Cliangps 

The litsi multiply function was nxmxl to a separate file 1 BigMult qV, The final 
recursion step is fanned out to a serious of completely unrolled matrix multipli¬ 
cation routines, 111 is technique alone improved speed agtin by almost a faemr of 3. 

-Vrutlysis of the disassembled output led lo a few small improvements fur v 3-1 
Specifically, the use of the stntct niuiitxrhstlenif as a Itjop control resulted 
in unrxx:essary rekxxls from nxmiry cvcn though the parameter Ls declared const. 
This inefficiency is avoided by making a local copy of the valtx. which in turn 
leads to tW unrofiing of die loop hy [ tlte oompfler 
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(define DBG 0 

//include <stdlib,h> 

# Include <stdio.h> 
flinclude <£tfing,h> 

(include <aath.h> 

/Hr D8G-=0 

/He tine NDERiJG 
//end if 

//include <assert.h> 

//include **bignum,h H 
//include “BigMult .h** 

lypedef unsigned char uclmr; 

Lypedef unsigned short ushort; 
typedef unsigned long uiong; 

typedef uehar* ucharptr; 

// HT Lind 1.0 ;ux used frequently to separate 52-hit values him HMjil lulvvs 

#d efine HI(chunk) ({chunk)>>16) 

#d e fi ne LG (chunk) ((chun k) fcG xFFFF) 

enura I 

kAddMode ~ 0 * 

kSubMode - 1 * 

kDivid&Mode - 0. 

kModuloHode = 1. 

kPos = 0* 

kNog = 0x80000000. // sign bit constant 

kBaae “ OxlOOOOUL, 

kiOk - 10000, 

kDet'aul tNueTc ras _ 8 // axitruLs mbtfraum size ofaflocatcd MyNum 
objects 

I; 

// constant fora liijrly accurate estimate of decimal digit lengths 

const double kDigitsPerBit^loglOU.O); 

Binary 

static uiong Binary(uchar* digits, int num) 

// converts up to 4 decimal digits to binary 

// digits arc assumed to Ik binary digits ((191 NOT digit duuacicrs (09) 

I 

assort((num>"l) && (num<=4)); 
uiong v^Mlgits: 
switch (num) 

I 

case 4:v = v * 10 + *++digits; 

case 3;v ^ v • 10 + *++digfts: 

case 2;v - v * 10 + ‘++digiis; 

J 

return v: 

) 

// Forward declarations t>f static functions only as needed 

class MyNum: 

typedef MyNum* MyNumPtr; 

static MyNumPtr Mult i ply MyNum/ const MyNutn & A .const MyNum 6 
R. inr sign); 

/'.. . .. .»* . . . 

/ 

/ Gass MyNum 

/ 

/ The eiiVi My Num represents the real data underlying ItigNum bigNumf )ata 

f Most cumputiUun and arithmetic work, is dnne in metlHnfci of this class 

/ 


class MyNum t 
private: 

uiong numTernraAl located: // hides sigri bit in MSB of ibis member 

public: 

1 ong lastTerm: // s!km»U 1 be a signed type, initialized to I 

unbolt term rkDefaul-NumTetmsl: // we store binary terms !>U first 

// const fumkms return computed values without changing MyNum: 

uiong NumTerittKAnocatedO const I return imniTerttinAl located 
& -OxMUQOQOOH 


uiong SignBitQ const 1 return ivtnnTormsAIlocated & 

Ox80000000;j 

uiong taNegstiveO const t return numTcrmnAllocated»31:1 
uiong MSB{) const I return term[iastTerm];1 
bool IsSmallO roust (return £(}“*( last Term fc ~1)3: I 
// bsiTcnn = Dor I 
along Uiong() const I 

if returns the value' of a small MyNum as a 52-hi t uking 
uiong x=tenn|0j; 

IF (lantTerm) return x+(term[l] « 16): 
return x; 

I 

uiong lsOtldC) const (return term ID} & 1:1 
uiong Log2() const 
l 

uiong lastTermVttlue=i ertn f lafltTermj ; 
along nuinBits=lsBtTerin * 16; 
while (lastTermVaiue) 

[ 

tiuraBits-H-; 
lastTe mV u 1 u e »=1: 

I 

return numBIts ; 


void SerNumTermsAllocated (uiong numTerms.uiong sign) 
t numTermfiAllocated-numTerms 1 (kNeg h sign);I 

void 

ClearMemory{) I menisei (t erm,0, sized (ushort) *NumTcrrcnAllocated 

0>:l 

void TnitCuchar* digits,ini mimUlglfs) 

// Initiutizr* MyNum fawn the decimal digits 

( 

int tiumH tghl)!glts=numDlgHs % 4; 
uchar ‘ endDigl t s~d \ gl t.s4 numDi gi ts; 

1 f (numHighDi gi l $) // <’(invert first few (<4) digits 

1 

term[0]“Binary (digit s.niiBtHIghDi gits) ; 
d 1 gits-1“numHighDigl is: 

1 else terra[0]=0; 
i3SLTernf™G; 

while (digit s<e nrfl 1 i g its) ff < iwivitl remaining digits in groups trf 4 
I 

uiong fourDigits-Kln«ry(digit«.4): 
MultipiyAddBylOk(fuuH>lglts); 
digitsi=4; 


void MultipIyAdd By 10k f along chunk) 

// Multiplies die currmi mimbtT chase CriK) hv l()k aiwl adds chunk to it 

t 

long carry^hunk, £^l)i lt=laMTerm: 
for (;i<=lt;i++) 

I 

along L=(terns[i]) *kl0k + carry; 
carry^HT £h); 
term [i]=L; 

I 

if (carry) 

I 

lastTeraHL: 
term fi]=carry; 

) 

assert (0= Hi (carry)): 


void BJnaryTol0k(const MyNum h A) 

//ConvertsMvNum from ChK (i.c Imin >Itcim- to 10k(Lc.twcmiloikvimal)base 

t 

const ushort* lastAterm^A,term+AJauiTerm; 
uiong L=*lastAierra,carry^L/k10k; 
t e rm1D]Ok: 
int j-0: 
while (carry) 

I 

L=carry%kI0k: 
carry/“klOk; 
turm[ ++ j] _ l«: 

I 
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iastTerorj; 

while (lastAtermM.term) 

Muir 1piyAddModIOk(* lafliAterm); 

1 

void NultiplyAddModlOkCuiong chunk) 

// Used mi BtaaryTolQk. Multiples MyNum by 64K, using 1 Ok Ixlsc ariihmeik, 
l 

long carrv=thtmk*i^O*lt® r laBtTf»mi; 
for (:i<«lt;i++) 

I 

ulong L*{Lermfi]« 16 ) + carry; 
carryH-ZklOk; 

Lenu[l]=L%kl(Jk; 

while Scarry) 

{ 

it-i; 

tfirmf i ++I r r y%fc 1 Ok : 

carry /- klGk; 

\ 

Xnu tTertrtt; 


Mac JOS x 


I m 7 a I 




pment 

mbs 





. Mac OS X 

Making the Move 


long klQToDigits(uchar' digit's) connt 

f 

// Qinverts 10k based terms to simple decimal digits. 

// Note: terms are stored LSFi first, digits sire/ stored MSB first 

ulong D-icrm[laa LTerm}; 
in L 1= 

(U>=10y0l?4: CO-100)?J: (D>-1G)?2:1: 
switch (i) 

\ 

case 4; digitsJ31 -DTUOiPZ-K); 
case 3: digits [21=0% 10 :&/”*(>: 
cane 2; digitalj=n%10;D/=10; 
rase I : dig 11 s[ 0 ]=L 1 : 

I 


with JjJrJC OB % just over the iMftEMJ . 

Mac developer^ everywhere have a 
major need for CARBON and 
application porting, , . user interface 


int lt=lastTerm; 

tor (int j=It -1; j ; |-, 1 i -*i ) 

t 

D-tennf j] : 

digitfl[i43]«|»i0:0M0; 
digit;; [ 1 +2 3 = 15 % 10 t D/— 3 10 : 
d tgi U [i+l]-D% 10 ;D/= 10 : 
digitnlij=D; 

I 

return i: 


int CompAbsolute.(const MyNum & A) const 

// Compares the absolute values of MyNum and A 
// Assume both numbers are nonnufcctl (no leading /cn*0 

( 

assert(termLiastTerm]): 
assert (A. term [A, lastTerml); 
int It-LastTenn; 
if £lt > A. lastTenn) return I; 
if {it < AJastTcrm) return 1; 
do I 

II C Lem [It] > A. term Lit J) return 1; 
II [cerm[ltj < A.rermUtl) return -1; 
I while £-it >- 0); 

// ftjr (Int Ntd>=0i—) 

// 1 

// if (term|i| > Aierm|i|) return I; 

U if (term [i] < A.tenmlij) nium -I; 

// 1 

return 0; 

\ 


implementation, and iHiilH development 
services. Toward that end, several 
high-quality engineering 

firms, in association with the HPPLI 
IDEUELOPEfi [QNNEDiDW, are offering these 
services at very attractive discounts 
to all feSC Select and Premier members. 


void Sum(const MyNum & A.const MyNum & B) 
// MyNum = A -f II (absolute values) 

// Assumes A has at least as many terms as ft 

// MyNum has enough terms allocated to handle the result 

{ 

assert (A, lastTerm>=B. lastTem); 

ulutsg L^A. temLOJ+B. tertnlO] h carry=HI (L); 

tern[0]®L; 


The following pages 
are those vendors that 
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Porting & Development Showcase. 













OS X Development 




Ready to take 
the plunge? 


Okay, everyone into the Aqua! 
What/ Can't swim? No problem. 
Just climb on our back. We've been 
to the bottom of Apple's new Mac 
OS X, far beneath its cool Aqua 
interface. Porting to Carbon, Diving 
into Cocoa, Tiring up PowerPlant. 
And developing KEXTs, NKEs, and 
[OKit drivers. If you're working on 
an OS X project, we can support 
you at every level. 


A deep pool of talent 

We founded our firm on the Mac 
a decade ago. It's in our DNA, Which 
is why clients such as 3dfx, Apple, 
and Lexmark come to us for 
assistance. We specialize in full-service 
commercial software development and 
we thrive on challenging projects. 

The ones that make your head spin 
and your staff suck for air. 


Contact us soon. We'll help you 
make a splash in the market 
—cannonball size. 





tware 


711 SW Alder Street, 4th Floor, Portland, OR 97205 503.222.2922, www.cnticalpafh.com 

Portland * San Diego * Tokyo 







Robosoft Technologies 


www. robosofti n .com 


Indian mind power 

an un 


partner 
j n product 

development 



arbon Porting 
^qua implementation 
Windows to MacPortin 

special discounts for ADC members 


eatable price 


rj 

o 



Robosoft is an India based specialist in Mac product 
development, Windows to Mac porting, Carbon porting 
and Aqua implementation. Our engineers have a strong 
product development experience with a thorough 
knowledge of C/C++, Java,Mac OS Toolbox, 
Macsbug, QuickTime, Carbon API and PowerPlant 
Application Framework. 

We have a proven track record for product 
development out sourcing and delivering the 
projects on time. Our clients include a veritable 
who's who in the industry - Apple, Adobe, 
Quark, FileWave, Versaware, Veon, NetJumper, 
CEI, The Anderson Group and eCapital, among 
others. To know us better, visit our website 


>»» 

i nfo @ robosof tin. com 















ShadeTree 


Software Development 415.491.2201 

Outsourcing Since 1990 www.shadetreeinc.con 












Call Red Rock Software at 888.689.3038 or visit us at www.redrocksw.com 


Aqua Interface Implementation, Carbon 
Porting to Mac OS 8, 9, X, and Cocoa Application Development 







□ Eat your vegetables. 
0 Exercise every day. 
5? Port to Mac OS X. 

C Call your mom. 


All of these are good for you. 

| We can make one of them easy. 

I- -- . ____ . 


Since 1989, The Omni Group has worked with the technologies that have been refined into Mac OS X. 

Moving to Mac OS X is a big step for your company, and you need consultants who can help you both 
plan how best to make the transition and follow whatever path you choose. 

That's been our business for years, No matter what kind of product you have, we can get it up under 
OS X, fast: 

• Reai games: We ported id's Doom and Quake games to NEXTSTEP and OS X. Quake 2 took us a week. 

• Big apps: We ported Adobe’s FrameMaker to NEXTSTEP and Sun's Concurrence to OpenStep/Solar is. 

• Big libraries: We ported the Oracle 8 client libraries which Apple ships today in OS X Server. 

• Serious drivers: We ported 3dfx'$ Glide and wrote Voodoo2 and Rendition drivers for OS X Server. 

We've written new mouse drivers for OS X Server and joystick drivers for OpenStep, 

• New apps: We wrote OmniWeb, the only native OS X web browser, and OmniPDF, the native Acrobat 

viewer for OS X, 

Mac OS X is what we do. Let us help you do it, too. 


The Omni Group 



2707 Northeast Blakeley Street sales@omnlgroup.com 

Seattle, Washington 98105-3118 800.315.OMNl x201 

www.omnigroup.com/consulting 206,523.4152 x2Q! 


Mill ON X. NBtrsnr, ttrid OpepSicp urv irudcnnirk* filApuk. ArmbtU dtxl itumeXlukcr ore uwf£mutkM4 Adobe System*, Tm; <>nakc and jPtiom are tnidoiturta of U Software. Sofom and Omurruiuc are trade mu 
o\ SimMknifi^iems. fJrarfcj bt a I faik-'i*iiirk of Oradeu Ulldexid Vt*xkK> ure imdeimrkf ol ,<dlx 41 IheOmiri UrnuR" Omni Well, QtnlnPJlK and the Omni Gem Ujro are cturx LIcmwcJutVi sue us. And urilyour mon 

















Get the power and experience you need from 



engineering 




With over thirteen years in providing 
programming service to the Mac community. 
Prosoft is committed in delivering the ultimate 
quality software products and service. 


Our Engineers have extensive knowledge in: 


• Macintosh PPC Drivers, 
Shinns and Extensions 

• Macintosh Power Plant 
Applications, Mac OS X 
applications and drivers 

• Carbon application 
porting for Mac OS X 

• Multimedia and QuickTime 
Applications 

• Unix/Linux Console 
Applications, including 
Unix Solaris, xBSD Drivers, 
and Linux Drivers 


o 

• Windows 95, 98 

o 

• Window CE 

■« 

0 

• Windows NIT, 2000 

ft 

Q 

(A 

• Unix / Linux 

0^ 

• Java 

ft 

X 

-o 

• Embedded OS 

ft 

• RDBMS 

(A 

ft 

• Network Consulting 















comDatible 




Since 1991, high tech companies like Apple Computer, 
Hewlett Packard, and Leica Microscopy have turned to 
Art & Logic for assistance in implementing cutting 
edge technologies. 


Now, with the advent of OS X, Art & Logic is helping 
companies make their products compatible with 
Apple’s new operating system. Art & Logic engineers 
are industry leaders in Carbon & Cocoa porting, Aqua 
implementation, and driver development. 


In the new economy, where time to market is every¬ 
thing, you need results. Art & Logic delivers. 


“We have found the engi¬ 
neers at Art & Logic to be 
outstanding—better than 
excellent. When we use 
their software development 
services, we get results.” 


Ted Dykes, CEO of LRO, Inc 


Art & Logic, Inc. 


www.artlogic.com 
877-278-5644 (toll free) 
info@artlogic.com 




The software engineering company that helps bring your 
hardware product to market—guaranteed. 












int 1=1,blt=B,lastTetm: 
for (;l<”blt;±-H-) 

I 

L^A* iorm[i3 + R. terra [l ]+carry; 

carry=lli (L) ■ 

tennliJ—L; 

) 

int lt=A.lastTetm; 
for (;l<=U;iH) 

I 

L=A, term fi]+ca try ; 
carry^il (L): 

1 

if (carry) 
l 

a&SCr I (I < NumTnnnnAl located 0 }' 
U-i; 

term [i]“carry; 

I 

lastTenn-it: 


vo\d Difference(const MyNum A A.const KyNum A U) 

// MyNum = A * B (absolute values) 

//Assumes A has at least as many terms as R,and A >= I) 

// MyNum has enough terms allocated to handle A 
I 

assert (A, lastTerm>=B. lastTertn) ; 

long L=A + term[0l-B.termlO].borraw=iLL(L); 
termfOl®L; 

1 n t I - i « b 1 r-R,I .letTena; 
for (;i<~bU;l++) 

l 

L”A.te rm fi1 B. term [ 3 J +bor row; 

borrow^El (L) : 

cerm(iJ-L; 

J 

int 11**A. lastTeim; 
for (:i<"U;i++) 

I 

L—A + term[ij + borrow; 
borrow=Hl (L| r 
temUI-'L: 

J 

// remove leading zeros 

while? E(1t.>m AA (term fit 1 =0)) It-; 
laatTorrarl t ; 


void Small Product (const MyNum A B, const MyNum A A f ulong 
hiTerm) 

// MyNum -A 1 El (absolute values) 

// MyNum lets enough toms allocated to landkrA’B 

l 

assert (NumTcrmsAl located () >=! IhiTenn): 
memset (term*0, (1+hiTcnn) *u iy.oof (unhart)); 

Int alt“A,lastTerm.blL=H*lost Term: 
for (int i=0ji<=slt;i++) 
f 

ulong a=A*terra[ij; 

for (int j~G;j<=blt;jl0 

E 

inL k-j 

ulong x=tenn[k]+a t erm[j] : 

term[kj=x: 

ulong carry=lil (x) ; 

while (carry) 

t 

aRftart (k i L (NumTermsAllocated ()); 
jt—terffi [++k]+carry; 
tcnn[k]-x; 
carry=lll (x) ; 

I 

I 

1 

// remove leading zeros 

while (hiTerm AA (G=tsrra [HiTerai])) hiTerm-; 

lastTeoirbi Terra; 


void Product (const MyNum A A .const MyNum A B) ; 

// MyNum -A ' EUahsulutc values) 

void SmallQuollent (MyNum A R*const ulong divisor) 

// Divides K by the small divisor, it single ulong. 

// MyNum - R / divisor (absolute values), 

// MyNum will l>c the quotient. K will contain tlw remainder 

E 

int ir=R.lastTerm; 
ulong upp*?rDigir,={}; 
f 0 r f i nt i q=i r ; i q^O; iq—) 

( 

up pc rDi gi t < <“1 b ; 

ulong x=R*terra[iql + uppeeDigit; 
if (upperDigit) 

I 

R.termfiqtll“0; 

R f lantTermriq; 

1 

if lx < divisor) 
t 

term[iqj^0: 
upperDigit^; 
i else 
( 

ulong y=x/divisor: 

Lena! [q] 1 ^; 
if (lastTernKtq) 
laatTerirrlq; 

R. term[iql=upperUlgly'diviuor; 

I 

I 

1 

void Quo t lent (MyNum A II, const MyNinn A V); 

vold DeNorraa1 i zo(In L shift) 

// Reverse si lift operation tor the remainder after (big)Quatient division 

l 

int i=0,lt^iastTerni: 
for [;i<lt;i++) 

{ 

ulong (ternafi+ll << 16) 1 term[i]) » shift; 
terra [i]”v; 

J 

tennlil »- shift: 

1 

void Power(const MyNura A A.const ulong e) 

// MyNum =A " e,all values must be jxisitive 

//The power b eduatod by scanning the exponent MSB first 

// For cadi except the first bit, the current value of MyNum is squared, 

// If die bit is a l.thc current value of MyNum is then multiplied by A 
// Multiplication requires a distinct product destination, so a Lem porin' MyNum T 
// is allocated, ladi; mtiltiplicntion uses either MyNum orT as the MHirrt;,and 
// the other as the destination, 

l 

annert(numTermsAllocated>A.lastTerm): 
assert(e l* 0); 

// copy A to thlu 
las t Te rm=A.last Te m : 

memcpy(term.A,tenn.(1+lastTetm) t s±aeof(ufibort)); 
tf (e=l) return; 

// fiml MSB of the exponent 

ulong ntEiak^OxSOOOOOOO: 

while (te A nmsk) = 0) mask »- 1; 

mask »*- 1: 

// make a second MyNum to hold intermediate products 

Int nlloeatedSize (nuraTermsAllocated kDefaultNumTonns) 

sizeof (usborL) + sisseof (MyNina); 

MyMumFtc T=MyMuinPLt (new ueba r | a UocatedSize]); 

T- >numTermsAlXoeated^iutnTonni;Al located ; 

// we ll multiply by ping-ponging between M)Tfum and T 
// but the result should end up in MyNum 
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MyNural'i r t«np[2] =* (this»TI; 


int k”Oi 

while E mask) // riff c-jhlIi aUditRtrial bit in e 

I 

//; ihvays square 

tempfl -kf ->Producr (*teraplk] * *tcmp[k] ) i k^l-kr 

if (e 6 mask) 

\ 

// mulUply by A if bit is set 
L i.’mp [ 1 k I >Produc 1( * temp l k] * A); k" l - k I 

I 

rassk »= 1; 


i f (k= 1) // result ended up in T: must copy to "tills 

1/lf] t.Tc r m“T > 1 as t To rtn; 

memepy (tertt,T->tem. U + lastTem) *sixeof (ushort)) : 
delete [J T; 

1 

void SquareRootEsfimate{roost WyNum 6 A} 

// Returns the squaw root of the thne or four most significant terms of MyNum 

I 

n b se r L (A«las t Te m>=2 1 ; 
ini lt“lastTerm=A.lastTerm/2: 
double top3DigitS - A *UlongO* 65536.0 * 
A.temlA.iastTerm^l ; 

if lA, 1 astTer m= 2) // just use i hi'thrve digits 

I 

li long rool^qxt {top3Digits) ; 

// the top 5 digits of A art converted to a it hit nH>t 
// the result b loaded into the lop 2 digits of MyNum 

if (A * last Ter m & 1) // even number of digits in A 

I 

terra [It] ** root >> 8 : 
ttrtn[lt 1]** root « d; 

I else 

I 

terraLItJ & Hl(root); 
terra root; 

I 

el :>* // use top 51 or >2 hits to get ihr most from sqrtCdoublc) 

l // resulting In a 26 bit estiraaie 
ulorig lautTerraVa 1 ue=A.Hi>B(): 
ulong ahift=U: 

whi Lg {las tTe rraVa >OxF // get minimum even si/c of MSB word 

// keep at least i Ikts 

shift*“2; 

1 as t ie r snVa I ue > >=2; 

I 

along fart or “ i<<{16 shift); 
double t.op52HitiS- 

top3Digits * factor + (A.term[A.iastTerm 
31 t); 

along root^sgrt(top52Bits) : 

// Ihe U>j> i digits of A (minus shifted hits) an- converted to :t 26 hit rum 
// the result is tattled into the top 2 or 3 digits of MyNum 

shift /- 2; 

if (A. 1 ?m . t Ti • m b J) // even number i if digits iti A 

I 

term [It J = root » (16 shift): 
tertn[it’ lj- root « shift: 

I else 

t 

termfltl « root » (?A shift): 
terrafIt-1]• root » (S shift); 
term[It 2]- cool << (shift+B); 

I 

I 

I 

along Average(MyNum A A) 

// MyNum Ixxomes die average of MyNum and A- 

// Returns true if tile original MyNlint ami the new average are difltTuii, 

( 

assert tlastTerm=A. iastTerm); 


along carry 1 *!); 

u 1 ong eompa r o=0: // detect and track dutnges in company 
for (ini i-lastTerm;i)“0;i“) 

I 

ulong oidTerra^termti]: 

along x - (carry + oldTerra f A-terra[1]): 

carry = (1 6 x) « 16; 

x »“ 1; 

termUl^x; 

compare oldTerm A x: 

) 

return compare & QxFFFF; 

long EstimateLengthO const 
//l lie length iododmal tligits Is estimated front tlir number of bits used 
//ihe result should always lx: within I digit of the true axmt, 

I 

double nutnDig.it jr=Log2 () *kDigitsPerBit; 
return l+long(numDigits); 


void Normalize() 

// Removes leading /enis 

i 

int k^lastTerm; 

while ((k>0) 66 (terra[kl^=0)) k—: 
las iTemr^k: 

1 

BigNutn Convert2BigNmn(): 

// Returns the BigNum lepresentatkm of MyNum 

I: 

//The following MyNum functions ;ire not inlincd {reduced st/.e. rn i loss of speed): 

Bi gNura MyNum:: Convert2BigNum C) 

// Ketiims tilt IligNum representaLiou of MyNum 

I 

Normalize. () ; 

BigNum roaull; 

rcsulL + bigNmnData=this: 

r oim 11,1 etigt h I nD i g i t s^Es t i rna t eLen g t h () : 

return result; 

I 

void HyNiim;: Product (const MyNum 6 A,eonL:t MyNura 6 B) 

// MyNum = A 1 It {absolute values) 

// MvNum Ills enough terms alkxaird to IliihIIl AMI 

I 

ulong alt=A.lastTeriD*bit-B. iastTerra.hiTerra=alt tbit; 

aasert(NumTermsAilncated()>“2+hiTerra); 

assert(alt >= bit); 

along aSize^altt1,bSizo=blt +1: 

if (bSize >= kMultiplyThrcohold) 

I 

// (tig numbers use tast multipl) which rwjuircs N to lx a small 
// integer «-15) times a power of two. Rmindl ip eiisuifs tliis. 

ulong lastTcirrai'l; 

N=KoundUp(N): 

//Alkxate memory for: 

// factor I I N terms (copy and pad A to l J) 

// litetor V N terms (copy and pad K toV) 

// pixxluct P 2N terms (compute P = l i K V ami copy tesnlt hick to MyNum) 

/t scratch dN terms needed lc>r intermediate pn ducts 

ushort* U=ttew ushort [iTM] : 
uishort* V=U + N; 
ushort* P-V + N; 

Djeracpy (U*A* terra*aSize*nizeof (unhorr)); 
raeraset(lHaSize.0,[N aSize)'utzeof(ushort)); 
raeraepy (V.B, t^rra.bS 1 zp’ n i /,oo f ( ushori ) ); 
raeraaet (V+bSi /e,0 T (N bSIze) *nixec>: (ushort)): 

Multiply (II * V, P, N, bSize); 

// remove leading zeros frnm P 

N 4- N-i: 

while (N 66 (0=PfND) N : 

assert(N<NumTcnnsAllocated()); 
meraepy(terra,P*(1+N)*sizeof(ushort)]: 
luscTemPN; 
delete [J U; 
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B->1flfitTermr-1: 
return B; 


1 else 

//Tlx; sim llest (actor is not so kllgc, we i tec a simple mu 1L i p 1 lea 11 on loop 
SmaliProduct(A * 0,1+hiTerm): 

1 

void MyNum; :Quotient (MyNum & U.const MyNtini & V) 

// Divides \ I by the MyNum divisor V 

// MyNum will contain the quotient, tj the remainder, 

//'llu: implemcniarion dosdy follows Donald Knuths algorithm 'D'(Vof.2 t pflge 272) 

i 

U U and V already normalized by cal let; ieVMSB >= kBase/2 
ifit n“l+V. lastTerm* //slrc of the divisor 
TnH.J. lastTenn- n. // rush index <if the quotient 
k=U. lastTerm, // msh dividend index 
j 1 =m; U ey tfknt index 

a s a 0 r L (n >=2) ; // for sma Her divisors, should i ise SmaUQuotientO 

ulong divisorMSB = V, term LV.lastTerm]; 
for (: j>^0; 

I 

along x“ along (U * terra [k]) *kBase X li.termfk’ 1] : 

along q^ x / divisorMSB; 
ulong r= x q * dlvisorKSB; 

if {(q=kBase) || (q*V.term[n 2] > (kBase*r X 

U.termIk-2J))) 

I 

q-; r+-dlvieorMSB; 


ulong u.carry^G.borrow^O: 

int i=0; 

for (:i<n:i++) 

I 

p = carry + q * V.tecin[i]; 
x=I I„term[jIi 1 LG{p) I bo r r ow; 
bor row^HT(1ong{x}): 
carry^HI(p); 

U.term[jXiJ=x; 


x=U.term!j+il - L0(carry) X borrow; 
borrow=Hl(iong(x)); 

I).term[ j+i j=x: 


lONti[j]=q; 

if (lastTerm<j) lastTem=j ; 
if (borrow) 

! 

termfj]—; 
csrry^O: 

for (Int i={hi<n; i++) 

{ 

x~carry + IL Lermfj+i] + V. term[ I]: 
U„ term[ j+i] = x; 

carry=lil(x) : 

1 

U.termljXij = 0; 


I 

// Denormalbation to be done hy the cafler only if the remainder is needed. 


/ 

/ Utility functions returning a MyNumPir 

/ 



static MyNumPtr Now (ini m i nJfttmTe rins. Int sign) 

// returns ;i fresh MyNum, with ;il least minNumTcrms tarns 

I 

int numTermsAilocated- 

(mi nNumTe r ms+kDe f aul tN mnTe rms -1) & ~(kDefault NumTe r ms - 

lh 

a sne r t C numTe rmfiA 11 oc at ed >^mi nN 1.1 mTe r mr,}: 

inr alloeatedSize " (numTormcAl 1 ocated kDefaul tNitiflTp.nris) * 
sizeof(usherL) + sizeof(MyNum); 

MyNumFtr B=MyNumFtr(new uchar[allocatedSize ]) ; 

B->SetNumTernjsAl1ocated(numTennsAIlocated .sign]; 


static MyNumPtr NewCopy(const MyNum & A,int sign) 

// returns a fresh exact copy of A, (die sign may differ from the sign of A) 

MyNumPtr B=New(A,NumTermsAllocated(). sign); 

B->lastTerm=A.lastTerm; 
momcpy(B- 

>term, A. Lortn,,A.NumTermsAll oca Led () •slzeof fushort)); 
return B; 


static MyNumPtr NewCopyShifted(const MyNum & A + 
int sign.int shift.int extraCigit) 

// remrns ;i fresh shifted copy of A, possibt> T expanded by I term 
t 

int reques L cd S £ I +ox i raDl gl i +A. las i Term: // allow for extra 

“digit" 

MyNumPtr B=New(requestedSi 2 e.sign); 

B - >lastTerm=A. lastTe rms-extraBigit; 

if (shift"0) // sintiglit cojjy, set extra digit to 0 

I 

memepy (B ->tsrm P A.term. (HA. lastTerm) 41 sizeof (ushort)} ; 
ff (ext r aDlgtt) B- >term [B- >1 nslTprta]=0: 

) else 

f //copy shifted, 

const ushort* at-A.term: 
const ushort* lastAterm^at+A.lastTerm; 
ushort* bf=B->tenn; 
ulong x-(ulongt*at) << shift); 

* br.=x: 

along carry^HI(x); 
while (ut<lastAtetm) 

I 

x=carry + (ulong(*++at) « shift); 

*+Xbt“x; 

carty^HI(x): 

1 

If (extram git) *++br=cnrry; 

1 

return B; 

1 

static MyMumPtr BinaryTolGk(BigNum bigNumA) 

// converts a BigNiim to a base-1 Ok MvNum 

I 

const MyNuitPl r A=MyWumPtr (bigNumA, b t gNumPnta); 

MyNtimPtr B“New( (blgNumA,lengthInDigitu+3)/4.A->SignBit [)); 
// allocate I itshon lur every i digits 
B'>BinaryTolOk(*A); 
return B: 


/ 

/ 1 itver of tile iirith met iV !i i ncl ions neturni tig a MyN u m Ptn 

/ 

/ lima ions determine the size of the result ;md allocate a new MyNum object 
/ accordingly, 

/ 

/ Hkmi they call a method of the aUtx^tted object for most of the aetnul .irithmelic, 
/ 

i ii m i u mHw tww wMw wwww^ 

static MyNuatPtr Add MyNum (const MyNum Sr A. 
const MyNum & B.int sign) 

// ret ante C -A + B 

1 

Ulong numTennsC—2+A,lastTerm: 

MyNumPtr C^lnw( numTumsC. sign): 

C >Sum(A,B); 
return C; 

I 

static MyMumPtr SubMyNuiti(const MyNum & A, 
const MyNum & B.int sign) 

//returns C ^A- B 
I 

ulong mffliTe r msC= 1+(A. la s L To rm); 

MyNumPtr C^Ncw (numTermsC.sign): 

C>Difference(A,B): 
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I 


return C; 


static MyNumPtr MultiplyMyNum(const MyNum & A. 

const MyNum 4 B.int sign) 

// returns C = A 1 B. 

I 

u 1 on g n umTe r m s 0^2+A * 1 a s tie m+B * lastTe rm: 
MyNumPl r G=Now (numTenuaC, £ ign); 
if {A. last Term >= B. lastTenn) 

C->Product[A.B); 
else 

C->Product(£.A); 

return C; 


sialic ini Sh I itNcedecUconst MyNum k D) 

// returns bit shift needed to ensure MSB of a divisor is >- kBase/2 

( 

ulotig msb=0.MSB() + shift=G; 

while Cmsb < (kBase/2)) fmsh «=* l:shift++:l 

return shift; 

J 

static MyNumPtr ni vldeMyNuni(const MyNum h P. 
const MyNlun b I)* Int Sign) 

// returns the result of P/D, either 
// the quotient Q - P/D, 

// or the nmiindcr K = P'di according to the mode parameter 

assert (P. lastTerm >“ D. lastTemO : 
long nuaiTemsC^ 1+P, 1 astTerm-D, 1 astTerm; 

MyNumPtr Q=Ncw(numTermst).nigti) ,R; 

it (D. 1 a s tie rnP^O) // single “digit" divider 
1 

R^NewCopy(P.sign); 

0->SmalXQuotient E *R *D * te rm tO]); 

1 else // general case 

t 

int shift^ShiTtNeeded(D); 

// Create shifted copies of dividend and divisor 
R=NewCopyShifted(F.sign.shift,1); 

MyNumPtr V~NewCopyShifted(D.sign,shift.0): 

Q->Quotient(*R* *Vj: 
delete [] V; 

J 

delete [] R; 
return Q: 


static MyNumPtr ModKyNum(const MyNum b P.const MyNum & U.lru 
sign) 

// returns the result of P/D. either 
// the quotient Q = P/D, 

// or die remainder R = P'd), according to the mode parameter 

l 

assert (P* last Term >= D.lastTenn) : 
long numTennsQ= 1+P . 1 as tTe rm - I). lasiTe rm ; 

MyNumPtr Q~New(numTermsQ,sign),R: 

If (D,las tTe rra—0 ) // single u digit" divider 

S 

R-NewCopy(P f sign); 

Q >Sma1iQuot1ent{•R.D.te rm[0]); 

1 else // general case 

1 

int shitt-Shi f tNeeded(D); 

// Create shifted copies of dividend and divisor 
R=NewCopyShiffad(P.sign.shift,1)* 

MyNumPt r V“NewCo pyShif ted f D.sign.shif t, 0) ; 
Q-Xhioti«nt(*R.*V)i 

delete [J V; 

R- >DeNormalise(shift) : // undo hit shift 

\ 

delete fl Q; 
return R; 


static MyNumPtr FowerMyNumf const MyNum b A. 


const ulong exponent,int sign) 

// returns C * A ** B 

i 

ul ong numTermsC=2+A.kog2()'exponent/16; 
MyNumPtr C“NowEnumTermsC,sign); 

C > Fowe r(A.export ent); 
return C; 


static MyNumPtr SquareRootMyNum(const MyNum b A) 

// returns C = sqrtfA) 

//The algorithm starts with an estimate and refine* die estimate successively 
// according to the equation 
// 

// C = (C + A/C) / 2 

// 

// until C no longer changes. 

1 

ulong mimTermsC“(2tA.lastTerm) /2; 

MyNumPtr C=New{numTermsC. kPos) ; 

C->Clea rMemoryO : 

C >SquareRootSstimate(A): 
if CA.lastTerm<-2) 
return G; 
int n^Q; 

for (:n<=A.iastTerm:n- H - J 
* 

MyNumPtr D=DivideMyNum(A.*C.kPos); 

D - formalize {); 

If (0=C->Average(*D)) 

I 

delete [] 0; 
break; 

] 

delete [1 D; 

I 

return C; 


static MyNumPtr AddSubtract(const MyNum b A* 
const MyNum b B.int selection) 

//Addition and subtraction cases :u\ clLssillcd according to (he signs 
// :md relative sires of die openmih. 11 k resulting 24 jxjssihlc cases 
// can then he treated as add/sub tracts of fsosilivc mmilsers only 

switch (selection) I 
case G:case 3: 

case B:case 11;return AddMyNumEB,A.kPos); 
case 1 tease 2: return SubMyNumEB,A.kNeg); 
case 5:case 6; return AddMyNum{B.A.kNeg); 
case ^i:case 7; return SubMyNumEB. A.kPos); 
case t;case IDicase 12:case 15 i return 0; 

// null-pomier represents the value 0, 
case 13:case 14: 

case 21:case 22:return AddMyNumfA,B.kNeg); 
case 16:case 19:return AddKyNumEA.B.kPos): 
case 17:case IB:return SubMyNumCA.fl.kPos); 
case 20:case 23;return SubMyNumfA.B.kNeg); 

I; 

return 0; 

I 

yWWW Mt*tW4* * J*<i W M * <i M*M*****i *M **mMm*i uuiautu 

/ 

/ l JUJiiy funaions remmitig a UigNinii Ibr spceiil cases 

/ 

. .... y 

static BigNum Ze ro(Int Ipngth) 

// returns the BigNum vers«m of 0 (ktigth = 1) 

// or the error etxk- (length = -1) 

( 

BigNum result; 

result.lengthlnDigits^length; 
result.bigNumData“0: 
return result; 

J 

Static BigNum Copy(BigNum blgNumA.ulong sign) 

// remnis a I resit oop v of higNumA, sign chapge 

t 

BigNum result; 

My Nt i mPt r A=MyNumP t r(bigNumA.bigNumDat a): 
tcstil t JcngthlnDigits^igNuinA. lengthlnDigits ; 
rcsul U bl gNumDa ta=NewCopy (* A T sign): 
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return result: 

I 

italic BigNum SmallValuoCulong value,ulong sign) 

// returns the signed BigNum version of vahtc, 52 bits max. 

I 

MyNumPtr ONew(2 * sign); 

C->1a s tTe na=(value>OxFFFF); 

O>term[0]=value: 

C->term[1]=HI(value); 
re turn C - >Convett2BigNuni () ; 


/ 

/ External C Functions 

/ deal with special cases, then call arithmetic if and as needed. 

/ 


BigNum NewBigNum t 
char sign, 
char digits []* 
long numDigits 


r create a BigNum 7 

r+lor-17 

r digits io be made into a BigNum 7 
t number of digits 7 


MyNumPtr El; 

if ((num0igits=0) || (Mlgl is = 0)) 

// a leading aero will be interpreted as: the whole number — 0 
// numPigits is Ignored 
B-0: 

) else 

t 

B=New(C numDigit s+3)/ k ,sign); 

B >lnii(ucharPtr(digits).mnaOigits): 


BigNum result: 
result,bigNumData=B: 
r e sult.lengthInDiglt s=nmnD1git s; 
return result: 


long t numDigils 7 BigNumToDigits ( f convert a bigNum lo decimal digits 

V 

BigNum bigNumA, r bigNum to be cunvriied to decimal digits 

mi 

char * s i gn, t netum+l or-1 7 

char dig .t t s [ ] P dteci md digits t >1 bigN uni A 7 

t storage ft>r digits preaUocaied based on higNumA lengrhlnDigits 7 

) 

I 

c onst MyNumPtr A-My MumFt r(bigNumA.bigNumDa ta); 
if ( A^O ) // BigNum lias the special value 0 
t 

*sign=41; 
d i gi ta to]”0; 
reLurn 1; 

I else 
i 

const MyNumPt r B^BinaryTol Ok (bigNumA):// Lemporary number 
‘sign = (B->SignBit{)7 1*+1): 

long nuniDigits^B->klOToDigltfi(ucharPtr (digits)) ; 
delete [] B: 
return nitraDigjts; 

I 

j 


void DisposeBigNum ( P dispose of a BigNum 7 

BigNum theBi gNum /* die BigNuiii to be diseased of 7 

) 

( 

If (theBigNum.bigNumDaLa) 

I 

delete [J theBigMuiiK bigNumData: 
theBigNum.bigNumData=0; 

I// dst don’t delete if null (BigNum liad die special value of 0) 


) 

I 

const MyNumPtr A^MyNumPtr(bigNumA,bigNumData): 
const MyNumPtr B^MyNumPtr(bigNumB.bigNumData); 

if (A—0) 

I 

if (B) 

return Copy{bigNum£,B->SignBit()); // 0 + B ~ U 

else 

return Zero(l); // 0 + 0 - <) 

I else if (B=0) 

return Copy(b \ gNumA,A >SIgnBit0): //a + 0 = A 

int selection’ 

8 *(L+A->CompAbsoIute(* B)) + 

4*A->IsNegative() t 
2*B->IsNegative() +■ kAddMode: 

MyNumPt r C=Ad d S uht ra r. t £ * A f * B * s e 1 action); // genera] case 
:Lf £C) return C >Convcrl2BigNum(): 
else ret urn 2ero(1): 


BigNum SutatractBigNums ( /* subtract two tijgNumfi, reluming a new one 7 
BigNum bi gNumA, P return the difference A-B 7 

BigNum bigNumB 

) 

I 

coris f MyNumFi r A=MyNumP tr £ bi gNumA. b i gNum&a Lu); 
const MyNumPt r il=MyNumF t r (b i gNumE. b i gNumDa t a) : 

if CA—0) 

I 

if (B) 

return Copy (bigNumB*kNeg A B >SignBit0) ;//0*B = 4S 
else 

return Zero (1): // 0 - 0 = 0 

1 else if (B=U) 

return Copy(bigNumA,A->SignBit()): //A-l) = A 

int selertion = 

8 * (1+A - >CompAbnol lit e £ * B)) + 

4*A >IsNegat ive£) + 

2‘B >lsNegative£) 4 kSubMode: 

MyNumPtr C^AddSubtract (*A, *B,selection); //^ineta] 

case 

if (C) return C->Convert.2BigNuui(): 
elfie return Zero(l); 


BlgNutti Mult ipiyB 1 gNums ( t muItiply \ w<> BigNiims.tvnirnin^ a nt^< nu: 7 
BigNuin bi gNumA. /* netum die product A*B */ 

BigNum bigNumB 

I 

const MyNumPtr A = KyNumPtr(bigNtiinA,bigNumData) : 

const MyNurnPu B^MyNumPt r (h i gNumB.bl gNumDara) ; 

if [ (A=0) | | (H=0)) //A'B = 0 if cither A or B = 0 

return Zero(l); 

const ulong sign * //A*B is netpuive if sdgnfA) h= s^gnfB) 

A->SignBit() A B->SiguBit£): 

MyNumPt r C=Mu l t i p lyMyNum (* A. * B. s i gn) : // general case 

return C->Convert2DigNum(): 

1 

BigNum DivideBigNums ( t divide two BigNums, returning a new one 7 
B i gNum h i gNumA t f return the quotient A/B t discanling die 

omainder 7 

BigNum bigNumB 

) 

I 

c o nst MyNumP tr A-MyNumPt 1 1 bigNumA.bigNumDa ta); 

const MyNumP t r B^MyNumPt r(bigNumB *b1gNumD ata): 


B i gNum Ad d B ] gNums £ f si i m two BigNoms, icuiming a new one 7 

Bi gNum b i gNumA. t return the sum A+B 7 

BigNum bigNumB 


i f £ B=0) // A/B is an error if B=sQ 

return Zero( 1); 

if CA—0> //A/B “0 ifA==0 
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return Zero(1); 

3 n t comp a r i son^A > Comp Ab so lux e (* B); 

If (comparison < 0) //A/ll = 0 if (A < B) 

return Zero(l): 

const ulong sign = // A/B is negative if sign(A) != sign(B) 

A->SignBit{) A B->SignBit() ; 

if {comparison = 0) //A/B = -Hi if{A= U) 

return Sma11Value{1.sign): 

MyNumPtr C-UivideKyNum( + A. *B. sign) * // general case 

return C->Convert2BigNum(); 


BigNum MoriBi gNiims ( /* divkle two HigNums, returning a new one 7 

B i gNi im b t gNumA, t return Uk remainder A&B, decanting the 

quotient 7 

BigNtim bigNumB 

I 

const MyNuroPtr A=MyHumPt r {bigNutnA, b igNtimNata); 
const HyNumPtr B=MyNumPtr (bigNurnB*MgNuraData): 

if (A=0) //A mod B- 0 if (A=0) 

return Zero(l); 

const ulong sign=A->SignBit(); 

// sigji(A mod B) = sign< A), sign< B) ditcs not matter 

if (B—0) // A mf>d B = A if (B=0) 

return Copy (bi. gNumA. sign) : 

const 1m comparison^->CompAbsolute(*B); 
if (comparison = 0) //A mod B = Oif (A==B) 

return Zero(l): 

MyNumPtr C m (comparison < 0) ? 

NewCo py C * A.ai gn} : // A mod B = A if (A<B) 

ModMyNum (* A, *fi« sign); // general ease 

return C > Coiive rt2BIgNura{); 


BigNum Power BigNtims ( 

r calculate one Bignum to the power of another, returning a new one 7 
B i gNum b i gNu mA, f a t urn A raised to d nc pt jwct l) 7 

BigNutn bigNumB 

I 

const MyNumPtr A=MyNumPt r (bi gNumA, bigNumDat a); 
const MyNumPtr B-MyNumPtr(MgNumB.bigNumOaLa); 

// special cases: 

if (A=G) return ZeroO): //()“* N “0 

if (R=0) return SmallValuetl ,kFosj; //A **()=] 


// New I to take care of the sign: 

// sign of it still is negative only if A is negative, and R is odd 

const ulong sign-(A->SignBit() & (B->taOdd0<<3i)); 


if (A>IsSmaIl() && (A-XHnngO 
return SmallValue{1,aign); 

U 1 ** 


odd) 


”D) 

// +1 ** -HR — +1 

+-B = +1 (B even) or -1 


(B 


// aU other cases of B negative: 

i f (B>IsNegativa ()) // A " 41 = I /(A " B> 

return Zero(l); //A M 4$ Is <I.hence tnincaled u> 0 

if U B- > I sStna Ilf)) // this means, \vr have- an expo item dial is mo large 
return Zero ( !);// large powers art not supjxirtcd (too much memory 
implied) 

const ulong exponent^->Ulong(); 

MyNumPt r C-Pove rMyNum (* A, exponen t„ s ign) : // genera] ease 
return C - >Convert2BigNun] () ■. 

1 


BigNum Sqrt BlgNuin ( t find die sqrt of a RigNum, returning a new' one 

7 

BigNuin bigNumA f return the square root of A 7 


const MyNumPtr A~MyNumFtr(blgNutiA.bigNumDats); 

if (A=Q) return Zero(l); //sqrt(0) = 0 

if (A - > IsNegative ()) return Zero (- 1); // sqrt(-x) is caller's error 

if (A - > I s Sma 110) // sqtt(small value) handled diiectly 

ulong x=A XJlongO ; 

return Smu 11Value(sqrt(x),kPos); 

I 

MyNumPtr C^SquareRootMyNumf 4 A) : //gmemlease 

return C“>Convert2BigNutn{): 

I 

//Additional ftinction, provided for testing only: 

int CompareBlgNumf 

BigNum bigNumA. r returns + 0 - for bigNumA > == < bigNumB 7 
BigNum bigNumB 

I 

const MyNumPt r A = MyNumPtr(bigNumA,bigNumData )\ 
const MyNumPtr R-MyNuniPtr(bigNumB.bigNumData) : 

int tesult=A >CompAbsolute(*B); 
if (result=0) 
return 0; 
else 

I 

ulong anign=A->SignBit(): 
ulong bslgn=fl >SignBit(): 
if ( a isign=bsign) 

I 

if (asign)// both negative 
return -result: 
else return result: 

\ else 

i 

if (asign) //a only negative 
return -1; 
else return 1: 

I 

I 

I 


Bigmulxcp 

include <string.h> 
‘include "BlgMult^r 


r a " ,,l,tl11 . . .... 

/ 

/ f’iisr multiple precision multiplier 
/ (yright 0 2000, limsl M u\ iter, Kanahi, ({ linada. 

/ 

/ 

/ Inspired hy ‘How last can we multiply In The Art of Computer Programming 
/ by [Ronald Knuth (vol.2, page 295): Split and combine terms to reduce 
/ running time from order N-stjunrcd to N“(lg 5) for lat^e BigNums. 

/ 

/ The routine MultiptyO Gills ilsdf recursively until tlie si m of the 
/ factors is reduced to a range below 24 0 bits. 

/ 

/ A septriie unrolled function takes ore of the final matrix multiplication 
/ lor each sixtr (minimum si/je b H bv H terms). 

/ ^ . 

tfdefine 111 (chunk) ((chunk) >>16) 

//define LO(chunk) ((chunk) tOxFFFF) 


//Wc try to work the linal multipliGition wiihin ivgisters to conserve rqysicrs, 

// pairs of short factors, e g. Up] and Li]i+l| arc read into a single long register, 

// Note: this b^hnique was not impfcmented to lx |mortal>lc to iittk-cudian CPUs. 

//Hie strategy works perfectly for N=R and N-9. For N>9 T the compiler (CW’53) 
// f;uh to accomplish ihb, and d(x j s save some values on the stack. 
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// For N >= 12,a more straight forward technique is actually faster: we¬ 
re ad the 

// factors Util andVfj) from memory (cache) directly, each time they are 
used. 

//define UO (Hl(UOl)) 

//define U1 (LO(UOl)l 
//define U2 (HI (U23)) 

//define U3 (LO(U23)) 

//define 1)4 (HT(U45)1 
//define U5 (LO(U45)) 

//define U6 (H1(U67)> 

//define U/ (LO(U67)> 

//define U8 (HT(U89)) 

//define U9 (LO(U89)) 

//define U10 (HI(UIQII)) 

//define 1)11 (1,0(0101 I)) 

//define 012 (HT (U1213)) 

//define UI3 (LO CU1213) ) 

//define U14 (UI(U1415)) 

//define U15 U0(U1415)> 

//define VO (HI (V01) > 

//define VI (LOtVOl)) 

//define V2 (HI (V23)) 

//define V3 (I.O{V23)> 

//define V4 (HKV45)) 

//define V5 (L0(V45)) 

{ define V6 (HICV67)) 
define V7 (L0(V67)) 

//define V8 (HI (V89) ) 

//define V9 (L0(V89)) 

//define V10 (HT(V10I I)) 

//define VII (tO(V10U)) 

//define V12 (m(V1213)) 

//define V13 (LO(V1213)) 

//define V14 (HHV1415)) 

//define V15 UO(V1415)) 

//define F(a,b) lx=I.O(y) + (U 44a) * (V////b) ; 
y-HI(y)iHI(x) : I 

//define G(a.h) ix=LO(x) + (U////a) * (V////b) : 

y+*=HI (x) : I 

static void FinalMuitiply8 (const usbori* U, 
const ushort* V.ushort* P) 

I 

ulong 1101“* ( (ulong*) (U+0) ); 
uleng U23-*((ulong*)(U+2)) ; 
ulong U45~*((ulong*)(U+4)): 
ulong U6/■=*{ (ulong*) (U+6) ) : 

ulong V01=* ((ulong*) (V+-0)); 
ulong V23-*((ulong*)(Vi 2)) : 
ulong V45“*((ulong")(V+4)): 
ulong V67=*((ulong*)(V+6)); 

ulong x-IIO*VO. y-Hl(x): 

P fO)=x; 

F(0, I) : GU.O); Fl!]-x: 

K (0. 2) : CU.l); 0(2.0) : P T 21 =x: 

F(0.3): 0(1.2): 0(2,1); 0(3.0): Pl3]’x: 

F(0.4) : G(1 . 3) : G(2.2) : 0(3.1): G(4.0): P[4J-x; 
F(0.5): G(1.4): 0(2.3): G{3.2): G(4.1): CU.O): 

P[5]“x: 

F(0.6); G{1.5): GC2.4): C(3.3): G(4.2); G(S,1); 
G(6.0): P[6j-x: 

FID. 7): 0(1.6): 0(2.5): G(3.4): G(4.3): 0(5.2); 
G(6.1): 0(7.0): 

P17 J-x; 

F (1 . 7) : G(2.6); G(3.5); G(4.4): G(5.3): G(6.2): 

G(7 . 1) : P f 81 =x : 

F(2,7): G(3.6); 0(4.5): G(5.4): 0(6.3): G(7.2): 
PT91-X: 

F( 3,7) : C (4.6) : 0(5.5): G(6.4): G(7.3); P[iO]**x: 
F(4.7) : 0(5.6): 0(6.5): 6(7. ) : P[ll)-x: 

F(5,7); 0(6.6): G(7.5): Pll2]=x; 

F(6.7): G(7.6): Pfl3]=x; 

F(7.7): P|14l=x: 

PLl5l-y: 


stat le void FinalMultiply9(const ushort* II. 

const ushort* V.ushort* P) 

I 


ulong UO!’■*( (ulong*) (U+0)): 
ulong U23=*((ulong*)(U+2)); 
ulong U4S=*((ulong*)(U+4)): 
ulong U67-*((ulong*)(Ui6)); 
ulong U89-=* ((ulong*) (U *8)): 

ulong V01“*((ulong*)(V+0)): 
ulong V23=* ((ulong* HV+2)): 
ulong V45-*((ulong*)(V+4)): 
ulong V67=*((ulong*)(V+6)): 
ulong V89=*((ulong*)(V+8)): 

ulong x=U0*V0. y=HI(x): 

P10]«x: 

F(0,1) : G(1.0); P [l]-x: 

F (0.2) : G(l.l): C,(2.0): £M2)“x: 

F(0.3): 60.2); G(2,l): 0(3.0): Pl3j»x: 
F(0,4); G(1.3): G(2.2): C(3.1): G(4,0): 
F(0,5): G(1.4): G(2.3): G{3.2): G(4.1): 
P/bj-x; 

F(0.6): 0(1.5): G(2.4): 0(3.3): 0(4.2): 
0(6.0) : Pt6]=x: 

F{0.7): G(1.6): 6(2.5); G(3.4); G(4.3): 
6(6.1): G(7,0): 

P[7]=x; 

F(0.8): G(1.7): G(2.6): G{3,5): 0{4.4): 
G(6.2): G(7.1): 

0(8.0): P [81 =*x: 

F(l,8); G(2.7): G(3,6); 0(4.5): G(5.4): 
0(7.2): G(8.1>: 

Pl9l=x; 

F(2.8); G(3.7): G(4.6): G(5.b): C(6,4): 
0(8.2): 

P[10]=x; 

F(3.8): G(4,7); G(5.6): G(6.5): G(7.4): 
P[11J =x: 

F(4.8): G(5.7): G(6.6): 0(7,4): 0(8.4): 
F(5.8): G (6,7); G<7.6); G(8.5); P[l3)=x 
F (6.8) : G (7.7) : G(8.6): P[14J“x; 

F(7.8): 0(8.7): P[15)=x: 

F(8,8): P(16]=x: 

P[17]=y: 


static void FinalHultiplyi0(const ushort’ 
const ushort* V.ushort* P) 

I 

ulong UOI~*((uLong*)(U+0)): 
ulong U23=*((ulong*) (U+2) ): 
ulong U45* 1 * ( (ulong*) (U+4) ) : 
ulong U6/=*((ulong*)(U+6)): 
ulong U89=*{(ulong*)(U*8)): 

ulong V01=*((ulong*)(V+0)); 
ulong V23=*((ulong*)(V+2)): 
ulong V45”*((ulong*)(V+4)): 
ulong V67“* ((ulong*) (V+6)): 
ulong V89=*((ulong*)(V+8)); 

ulong x=U0*V0. y-HI(x): 

PlOi-x: 

F(0.1): G(1.0): P[l]-x: 

F(0.2) : 6(1.1): 6(2.0); P[2]-x: 

F(0.3); G ( i , 2) ; G(2.1): GU.O): Pl3J-x: 
F (0.4) : G( i . 3) : 0(2,2) : CU.l): G(4.0): 
F(0.5): G(1.4): G{2.3): G13.2): C(4.1): 
P[5]=x; 

F(0.6): G(l,5): G(2,4); 6(3.3); 6(4,2): 
G(6.0): P[6]“x: 

F(0.7>: 6(1.6): 6(2.5): G(3.4): 0(4.3): 
G(6. 1) : G(7,0) ; 

P[7]-x: 

F(0.8): G(1./); G(2.6): 0(3.5): G(4.4): 

G(6.2) : C(/.l): 

C(8,0); P(8)-x; 

F(0,9): 0(1.8); G(2.7); G(3.6); 6(4.5): 
G(6.3): G(7.2): 

G(8,1); G(9.0); P(9j=x: 

F(1.9) : G(2.8): G(3.7): 0(4.6): 0(5.5): 
6(7.3): G(8.2): 

G(9.1); FllO)=x: 

F(2.9): G(3.8): G14.7): G(5.6): G(6.5); 


Pf4]=x: 

G(5.0): 

G(5,1): 

0(5,2): 

G(5,3): 

G{6» 3); 

G(7.3): 

G(8.3) : 

P [12]=x: 


U. 


P f 4)=x: 
G(5.0): 

G(5.1): 

G(5.2): 

G(5.3): 

0(5.4): 

G (6,4) : 

G(7,4): 
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G(8.3): 0(9,2); 

Pflll-x; 

F (3,9): 0(9.8): C(5.7): G<6,6); 0(7.5): G(B,4): 
G (9.3): 

P [ 12]“x: 


F(4.9) : 

0(5, 

. 8 ) ; 

G( 6 , 

.7) ; 

G( 7 

. 6 ) : 

0(8.5): 

P[U]-x: 







F(5.9) : 

G( 6 . 

, 8 ); 

G(7, 

,7) i 

G (8 

, 6 ): 

G(9.5): 

F(6.9) : 

6(7, 

18 ): 

G( 8 , 

.7) ; 

0(9 

. 6 ) ; 

P [151 =x 

F(7.9) ; 

G( 8 . 

, 8 ); 

G(9, 


PU 6 I-X 


F(8.9) : 

G(9, 

. 8 ); 

P[17]=x 




F(9,9) : 

P[18j-x: 






P f19]-y 

: 








I 


Static void FinalMulttplyllfconst ushort* U, 
const ushort* V.ushort* P) 

I 

ulong IIO!-* ((ulong*) (U+0)) : 
ulong U23”* ((ulong*) (U+2)) : 
ulong U45“*((ulong*)(0+9)); 
ulong U6/“* ((ulong*) (11+6)): 
ulong U89“* ((ulong*) (11+8)) : 
ulong U1011-*((ulong*)(0+10)): 

ulong V0I-*((ulong*)(V+0)); 
ulong V23-*((ulong*)(V+2)): 
ulong V45-* ((ulong*) (Vt'i)) : 
ulong V6/“*l(ulong*)(VI6)): 
ulong V89=*((ulong*)(V+8)); 
ulong V101l-*((ulong*)(V+10)): 

ulong x-U0*V0, y»Ul(x): 

P|0]-x: 

F {0,1) : Gtl.O): P[ll=x; 

F (0.2) : 0(1.1): G(2.0): P T2]=x: 

F(0.3): 0(1.2): G(2,1): G(3.0): P[3j-x: 

F(0.4); 0(1,3): 0(2.2); G(3.l): 0(4,0): pf'il-x: 
1(0,5); 6(1,4): G(2.3): 0(3.2): G{4,1); GH.O): 

P15)-x: 

F(0.6): 0(1,5): 0(2.4): G(3.3); G(4.2); 0(5,1): 

G(6,0) : P[6)-x; 

F(0,7): 0(1,6): G12.5): GC3.4): 0(4.3): G(5.2); 
G(6.1): G( 7,0); 

P[/J=x: 

F(0.8); 0(1.7): G(2,6); C(3.5); G(4.4): G{5.3): 
G(6.2): G(7,1): 

G(8 .0) : P[8]=x; 

F(0,9): GO.8): 0(2.7): G(3.6): 0(4.3): 0(5.4); 

G(6.3): 6(7.2): 

G(8.1) : 0(9.0); Pf9l=x; 

F(0.10): 0(1.9): G(2.8): G(3./>: 0(4.6); G(5.S); 
0(6.4): 

C(7.3); G(8,2); G(9.1): C(10.0): PI101~x: 

F (1.10) : 0(2.9) ; C (3.8) ; GC4.7): G(5.f,): G(6.5): 
G (7,4): 

G(8.3): C(9.2): U(lO.l): Pflll-x: 

F(2.10): 0(3.9): 0(4.8): G(5.7); 0(6.6); 0(7,5); 

G (8.4) : 

G(9.3): G(10.2); P[12]=x: 

F(3,10): G(4.9): G<5,8): G(6.7): C(7.6): G(8.5): 

G(9.4) : 

G(10,3) : P11 3]”x: 

F(4,10): 0(5.9): G(6.8): G{7.7): G(8.6): G(9.5): 
GtlO.4): 

P(14]-x: 

F(5.10): 0(6.9): G(7.8): 0(8.7); G(9,6): G(10.5); 
P [ 15 ] =*x; 

F(6.10): G(7.9): 0(8.8): G(9.7): GUO,6); 

P[16j=x: 

F{7.10) : G (6.9) : G(9.8): G(10.7): Pfl7]-x: 

F(8.10): G(9.9); G(10.8): Pl!8}=x; 

F(9.10): G(i0.9): P[19J-x: 

F(IO.IO): P[20]=x: 

P f 211“y; 


// Macros redefined to read factors directly from memory 

#undef F 
//undef G 

//define FU.b) lx-i.O(y) + (GIsl) * (V[b]) ; 
y“HI(y)+HT(x);1 


/Mefine G(a.b) (x=LO(x) + (U[a1) * (VtbJ): 
y+=Hl (x):) 

static void FinalMultiply12(const ushort* 0, 
const ushort* V.uohorl* P) 

t 

ulong x=U[0] • VJ0] . y=IU(x); 

P[0]“X: 


F(0.1) 

: 0(1.0): 

Pfll-x 

J 




F(0,2) 

; GU.l); 

0(2, 

*0); 

PT21 

; 



F(0.3) 

: G(] ,2); 

0(2, 

,1): 

G(3. 

0) ; 

P[3] "x: 


F (0.4) 

: 6(1.3): 

G (2. 

.2) ; 

G(3. 

1) : 

6(4.0): 

P I4j-x: 

F(0.5) 

: 0(1,4): 

G (2, 


0(3, 

2) i 

0(4.1): 

G(5.0): 

P[3]=x: 








FC0.6) 

: G(1.5): 

6(2, 

.4): 

0(3. 

3) 1 

G(4.2): 

6(5.1): 

0(6.0): 

P[6l=x: 





F(0.7) 

: GU.fi); 

G(2, 

,5); 

G(3, 

4) ; 

6(4,3): 

6(5.2): 

G(6.1) : 

G(7,0) : 







P17)=x; 







F(0.8) 

: 0(1.7): 

G (2, 


G(3. 

b) : 

G(4,4); 

G(5.3): 

6(6.2) ; 

6(7.1) ; 





0(8,0): Pf8[ 

•x: 






F(0,9) 

: G( 1,8) i 

6(2, 

. 7>: 

G (3. 

6J ; 

6(4.5): 

G (5,4 ) ; 


0(6.3): G(7,2) : 

G(8.1): G(9.0): Pl9l-x: 

F(0,t0): G(1.9) : G(2.8): G(3.7): G(4.6): G(5.5): 
0(6.4): 

G(/.3); G(8.2): G(9,I>; G110.0); PllOl-x: 

F(0,l1); G(1.10): G(2,9>: C(3,8); C(4.7): G(5.G): 
G(6.5): 

G(7.4); G(8.3): G(9.2>: 0(10,1): G(11,0); 

P[111=x: 

F(t.ll): G(2.10): G<3.9): 0(4.8); G(5,7); G(6.6); 
G{7.4): 

G (8.4) ; G(9.3): GOO,2); G(ll.l): P[12j-x: 
F(2.11): G(3,10): G (4.9): G(5,8): C(6.7): G(7.6): 
G(8.5): 

C(9.4); 6(10.3): 6(11.2): P[13]-x: 

F(3.11): G(4,10): 0(5.9): G(6.8): G(7.7); 6(8.6}: 
0(9,5): 

g( io.4): 0(11.3): P1141=x: 

F (4.11) : 0(5.10): G (6.9) : 6(7.8) ; 0(8.7): G(9,6); 
0(10.5): 

GUI .4): PU51=x: 

F(5.11): G(6.10); G(/.9): 0(8.8): G(9.7); 

G( 10,6): G(1I.5): 

P f 16] ~x : 

F(6. I I ) : G(/.10): C (8.9) ; G(9.8): GUO.7): 

GUI.6): Pf I7J -x: 

F (/. 1,1) : C{8.10): G(9,9): 6(10.8) : G(ll.7): 

P[ 18 ]=x: 

F(8.U): G(9,10} : 0(10,9); GUI.8): PU91=x; 
F(9.11) : GUO.10): GUI.9); Pl20)-x: 

FU0.11): GUI.10): P[2l]=x: 

F(ll.ll): P[22}=x; 

P f23J"y: 


static void FinalMultipIy11(const ushort* U. 

const ushort* V.ushort* P) 

I 

ulong x=U|0]*V[0], y=lll(x); 

PfOl=x: 

F(0.1): G(l.O): Pll|-x: 

F(0.2): G(l,l): G(2.0); P[2l»x: 

F(0.3): 0(1.2) : 6(2.1) : G(3.0); P[3]=x: 

F(0.4): 0(1.3): G(2.2): 6(3.1); 0(4.0): P[4l=x; 
F(0,5): 0(1,4); G(2,3); G(3.2): 0(4.1): G(5,0): 
Pt5)-x: 

F (0.6): GO.5): G(2.4): G(3.3): G(4.2); G(5.1): 
G(6.0): P f6l -x : 

F(0.7); G(1.6); G(2.5): G(3.4); G(4.3): G(5.2); 
6(6.1): G(7.0) : 

Pf7]=x: 

F(O.B): 0(1.7); G{2,6): G(3.5); 0(4,4): 6(5.3); 
0(6.2): G(7.1): 

G(8.0); P[8)=x: 

F(0.9): G(1.8): G(2.7); G(3,6): G(4.5): G(5.4); 
G(6,3); G(7,2); 

G(8.l): G(9.0): P[9]-x: 

F(0.10): G(1.9): 6(2.8): 6(3.7): G(4.6): G{5,5): 
6(6.4): 
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You Won't believe what you tan do with Replay!V- It's not a VCR, it's a digital television recorder, so you can actually pause 

: live television, and do your own live instant replays. It also has a search engine, so you can punch in a keyword, say "Golf; 

% : * and it will find and record any golf program that comes on — all without videotape. Or you can just punch in the name of your 

© 

favorite show and let ReplayTV find it and store every episode, so you'll never miss it again. If you had ReplayTV, what 
4 would you do? Call us at 877-replaytv or visit wwwreplaytvxom 


© replay some televisions have all the 


©2000 ReplayTV, Inc, 


Available at Rest Buy and Amazon.com 












































G(7,3): G(8.2): 6(9.1): 6(10.0); H[10)=x: 
F(O.ll): 6(1.10); G(2.9): 6(3.8): 6(4./); G{5.6>: 
6(6.5) : 

G(7.4); G(8.3): 6(9.2): G(10.1): G(U.O): 
P[ll]-x: 

F(0.12) ; 6(1.11) ; G(2.10): G(3.9): G(4.8): 

G(3,7) : 0(6.6): 

CC7.5): 0(8.4): G(9.3); G(10,2); G(I1.1): 

G(12,0); F[12]-x; 

F(1.I2): G(2.11): GO.10): G(4.9): G(5.8); 

G(6.7); G(7.6): 

G(B.5): 6(9.4); GUO.3): C(U.2): 6(12.1): 
p[13]-x: 

F(2 .12): C(3.11): C(4.10): GC5.9): G(6.8): 

6(7.7); C(B.6): 

6(9.5): G(10.4): GCll.3); G(1Z,2); P[l4]-x: 
F(3.12): GC4.11): G(5. 10 ) : G(r>.9): 0(7,8); 

G(8,7): G(9.6): 

G(10.5): 6(11.4): GU2.3): P[15j=x: 

F(4.12): 6(5.II): G(6,1Q); G(7.9): G(8.8); 

6(9.7); GUO.6): 

G(ll.5): c(12.4): P116J =x: 

F(5.12): G(6.11): GC7.10): G(8.9); G(9.B): 
C(10./>: C(11.6): 

G(12.5): Ptl7l”x: 

F(6.12): GC7.11}: G(8.10): G(9.9): G(IO.V): 

G(ll.7): GU2.6); 

PflBJ-x: 

F (7,12) : GC8.11) ; C(9.10); GUO.9); GUI.8): 

G( 12,7); P[l9]“x; 

P (8.12): 6(9.11): G(IO.IO); G(11.9); G(12.8): 
P[20j=-x: 

F(9.12) ; GUO.11); Gtll.IO); G(J2.9): P[2l]-x; 
F(10.12): GUI. 11): G ( I 2 , 10): P[22]=x: 

Ftll.12): 6(12.11): P[2 3]=x: 

F (1 2. 12): P|74]=x: 

P12 51 '*y; 

1 


static void FinalMultiply14 (const nshor L 4 U. 
const uahort* V.ushorl* P) 


lilting x-III(1] *V [0] . y“lll(x): 

P(0]=x: 

f(0.1): 6(1.0); P11J =x; 

F (0,2): cu.l): G (2.0): P[2]=x: 
F (0.3) : GU.2): G(2.1): G( 3.0) : 
F(0.4) : GUO) : G ( 2.2) ; G(3. 1) : 
F(0.5): 6(1.4): G(2.3): G(3.2): 
Pl5l=x: 

F(0.6): G(!.5): G(2.4): 0(3.3): 
G(6.0): P[6]"x; 

F (0.7): CU.6): 6(2.5) : GC3.4): 
G(6.1): 6(7.0); 

Pl7j-x: 

F(0,8); G(1.7); G(2.6); G(3,5): 
G(6,2): G(7.1): 

0(8.0): P[8]-x: 

F(0,9); 6{I.B): G(2.7): G(3.6): 
0(6.3): 6(7.2): 

G(8.1): 6(9.0): P[9]=x: 

F(0.10): G(1.9): 6(2.8): 0(3.7): 

6 ( 6 . 4 ): 

G( 7.3) : 6(8.2) : 0(9.1); GUO 
F(O.ll): G(1.10); 0(2.9): 0(3.8) 
G(6.5): 


P[3]”x: 

G(4.0): P(4)“x: 
6(4.1): G(5.0): 

6(4.2) : G(5.1): 

G(4.3): G(5.2): 

G(4.4): 6(5.3): 

0(4.5); G(5.4); 

6(4.6): 6(5.5); 
.0): P[10J =x: 

: 0(4./): 0(5.6) ; 


6(7.4); 0(8,3) ; 0(9.2) ; GUO.I): 0(11.0): 
P(ll]-x: 

F(0.12): CU.11}; G(2.10); G(3.9): 6(4.8): 
C(3.7): C(6.6) : 

0(7.5): G(8.4) : G(9.1): GUO.2): GUl.l); 
C(12.0): Pfl2)=x; 

F < 0.13) : GU.I2); G(2.H): 6(3.10); 0(4.9) : 
G(S.8) : 6(8.7): 

0(7.6): G(8.3): G(9.4); GU0.3): G(U.2): 
G (12.1): GU3.0); 

P[13)=x: 


F(1.13): 6(2.12); 0(3.11): C(4.10): 0(5.9): 

G(6.8): 6(7.7): 

G(8,6): G(9.3): 0(10.4): G(ll.3): 6(12.2); 
G(ll.l): p[14]=x: 

F(2.13); 6(3.12): GC4.11): G(S.IO): 6(6.9): 
6(7,8): 0(8.7); 

G(9.6): 6(10.5); 6(11,4); G(I7.3): G(13.2): 

P [15J-x: 

F(3.13): 0(4.12): 6(5.11): G(b.lO): G(7.9); 
G(8,8): G(9.7); 

0(10.6): GUI.5); G(12.4): GU3.3): Pll6|=s: 
F(4.13): G{5,12); 0(6,11): G<7.10): G(8.9); 

G(9.8): 0(10./); 

G(ll.6); G(I2.5): GU3.4); P|l7]=x; 

F(5.13)r G(6.12}: G(7.11): 6(8.10): 6(9.9); 

GUO.8) : GUI .7) : 

G( 12.6}: G(13,5): PlIBj-x: 

F(G . 13) : G(7,I2); G(8, 11); C(9.IU): GUO.9): 
6(11,8); G (I 2.7) ; 

6(13.6) : P[19]=x: 

F{7 ,13) ; 6(8.12): GC9.11) ; G(10.10); GUI,9); 
0(12.8): 6(13.7): 

Fl20j=x: 

F(8.13): G(9.12): G(IO.II): 6(11.10): GUZ.9): 
6(13.8): 

PTill-x; 

F(9.13); 6(10.12): 6(11.11): 6(12,10): G(13.9): 

P[22]~x: 

FU0.13): 6(11.12): 6(12.11): 6(13.10); P(23)-x: 
F(11.13) : 6(12,12): 0(13.11); pr24l=x: 

FU2.13): G (13,12) ; PrZ5l=x: 

F(13.13): Pl26]=x: 

P(271“y: 


0(2,0): 
0(2,1) : 
0(2.2); 
6(2,3) ; 

P|2]-x: 
G (3.0) : 
6(3.1): 
G(3.2); 

P|3|=x; 

G(4,0) ; pf4l=x 
0(4.1): 6(5.0) 

6(2,4) ; 

6(3.3): 

6(4,2) : 

C(5.1) 

0(2.5): 

6(3.4) : 

G(4,3) : 

6(5.2) 

C(2,6); 

0(3.5): 

G(4.4) ; 

6(5.3) 

“x; 

6(2.7) : 

6(3.6): 

6(4.5); G(5,4) 


nt a I tc voitl FiiialMultiply(5 (const uchort* 0, 
const ushort* V.ushort* P) 

I 

ulonR x-UlOj*VlOl, y=Ht(x): 

P[0]=x: 

F(0.1): G(l.O); P[1 J*x : 


Pl5j=x: 

F(0.6): G(1.5) 

0(6.0); P(6)=x: 

F (0,7); 6(1,6) 

G(6.I); 6(7.0): 

Pl7j-x; 

F{0,8): 0(1.7) 

6(6,2): G(7.l); 

G(8,0): PI8]-x; 

F(0.9); G(1.8) 

G(6.3) : 6(7.2); 

G(8.1); 6(9.0): P[9]=x: 

F(O.JO): GO.9); G<2.8): C(3,7): G(4.6): G(5,5); 
6(6.4): 

G ( / . 3) : 0(8.2) : G(9,l>: GUO.O): Pfl0]=x: 

F(0.11): GO.10): G(2.9) : 0(3.8) : 0(4,7); G(j,6); 
0(6.5): 

6(7,4): G (8, .1) ; 6(9,2): G(10,l): GUl.O); 

P [ 11]=x: 

F(0.12) ; GO,II); 0(2.10) ; 0(3.9): C(4.8): 

6(5.7): 6(6.6): 

G(7.5): GC8.4): G(9,3): 0(10.2) ; GUl.l); 
GU2.0); P112J =x: 

F (0.13) : G(l,12): 0(2.11) : G(3.I0): G(4.9); 

G(5.8) : G (6.7) : 

G(7.6): G(8.5): 6(9.4): 6(10.3): C(ll.Z); 
G(12.1): G{]3,0) ; 

P[l3]-x: 

F (0.14) : GO.13); 6(2.12) : G(3.U): G(4.I0); 

G(3.9): 6(6.8): 

6(7.7); G(8.6); GC9.5); 6(10,4); GUI. 3): 

C (12.2) : C(13.1) : 

GO4.0) : Pfl4)-x: 

F(l.14); G{2,I3): G(3.12): 0(4.11); G(5.10)t 
G(6,9): 6(7.8): 

G<8.7): G (9.6); C(10.5): GUI.4); G(12.3): 
0(13.2} ; 0(14,1); 
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Pl15]-x: 

F ( 2.1 4) : GO . 13) : 0(4.12): Gf&.ll); G(6.10); 

G ( 7,9) ; G(8* a) ; 

0(9,7); G ( 1 0,6) ; 6(11.5)-; 0(12.4); 6(13,3); 
0(14.2) ; 

P [ 16 J-x; 

F (3 , 14) ; 0(4.13): GO. 12); 0(6.11); 0(7.10); 
0(6,9): 0(9,8): 

0(10,7) : G(ll,6); 0(12.5); 0(13,4); 0(14,3); 

P 11 7 ] " ?c; 

F(4,I4); 0(5,13): G(6,12); 0(7*11): 0(8,10); 
0(9,9): 0(10*8): 

0(11,7); G(J2.6); G(13.5): 6(14.4); P [ j 8 ) =x ; 

F C 5 ,14): 0(6,13): 0(7,12); 0(8,11): 0(9,10): 

G(10,9) ; 6(11.8)t 

G(12,7): 0(13.6); 0(14,5); P[19l=x; 

F(G,U); G(7,13): 0(8,12); 0(9.11): 0(10,10); 
0(11,9); 0(12.8): 

0(13.7); 0(14,6); P[20]^x; 

F ( / * 14) ; G (8, 13) ; 0(9*12); G(10.11): 0(11,10); 
002,9) : 

0(13,8) ; G( 14, 7) ; P f 2 11 =x ; 

F(B-• 14); 0(9,13); G(I0,12): 6(11.11); G(!2.10); 
003,9) : 

0(14,8); P|22|—xr 

F ( 9 . I 4 ) : 0(10*13): 0(11.12); 0(13,10); 

004,9) ; 

P [23]-x ; 

F (10 • 14) ; G (11 ,13); 002,12): 6.(13,11); 0(14,10): 
p[24j=x: 

F(U.14)s G (12 * 13 ) ; 003,12): G04.il); PUbj=x; 

F{12,14); G(13 * 13) : 0(14,12); Pr26]-x; 

F03.I4): 0(14*13) : P[2/I=x: 

F(14. 14); P f 2 81=x: 

P[79]^y; 


static int Svtbtraci (connt ushort* A.const ushort" 

B, 

ushort* D.int N) 


// returns ( if A < 11 

ft computes difference of IA - U I into space at D 

l 

lilt slgn^O; 

tor (int I — N : 1 >0 : ) 

I 

i-: 

if (A[ij < B [ij ) 

I 

Hlgn=l;break: 

! el rr* if (Afi| > BLU) 

t 

slgn=0;break: 

I 

I 

if (sign) I const ushoft* T""A ; A^B ;B“T: I 

long I*“ * A - ’ B , b o r r o w-H 1 (L) ; 

* i)~L; 

for (irU i _ I:!<N;iH) 

( 

L * *++A *++8 + borrow: 

borrow=Hi(L): 

*++D - L; 
i 

return sign; 

I 

static void Accumulate(ushort* dest. const iislmrl * 
A,int N) 

// accumulates the sum of rlest + A into ihe space at desi 

1 

long L-“dest+*A, carryall! (L) : 

"denr=L; 

for (int i = i ; i<N; if-i) 

I 

L = *-H?dcst + * i IA t carry: 
carry“HI (L) ; 

*dest = L: 

1 





*■ * - >> b ■» i * 


















while (carry) 

l 

T* ” '-■“■-desi + carry; 

carry-til(L): 

*dest * L; 

I 

I 

static void KegAcr.umul a lettishort* dear,const 
ushort* A *int N) 

// accumulates the difference of dcst A into the space at dost 

I 

long *A/borrow=HI (L) ; 

*dest=L; 

for (int i-l;i<N;i++) 

I 

L — *4+deat - *f+A + borrow; 
bocrow=HT(L) ; 

*dest — Li 

I 

while (borrow) 

( 

L “ 4 ++dest + borrow; 
borrow-HI(L); 

*dest - L; 

) 


typedaf void FinalMultiplyFun(const uahort* * 
const ushort*, ushort*); 

static void Dummy(const ushort*,const 
ushort*,ushort*)I] 

static F \ na1MultIplyFun *FinalMultiply[16] - I 
Dummy.Dummy.Dummy,Dummy.Dummy * Dummy,Dummy,Dummy. 
FinalMultiplye, 

FinalMult ipiy'J, 

FinalMuitipIylO. 

FinalMultiply]1. 

Final Kill t ipl y 1 7 * 

FinalMultiply 13, 

Final Hu1i1p1y14, 

F j nalMultiplyib 


void Multiply(const ushort* U,const ushort* 

V.ushort* P,const Int N,const long nv) 

// Recursive function to multiply arrays U and V. where V may have 
many leading Os 

// N is the size of U and V I 1 is expected to have size 2N 
// nv is the actually used size of V. 

// if nv is less than 1 /2N. computation of O-value higher terms is 
avoided 

I 

it (N< = 1 5 ) // actually N should always he >- H 
I 

FinalMulttpiy[N](U.V.P); 
return; 

I 

niemset (P.G.2 4 N 4 eizeof(ushort)) : 
if (nv>N/2) 

I 

const ushort* uOHJ; 
const ushort* ul—U+N/2: 
const ushort* vO^V; 

Const, ushort* vl=V+N/2; 
ushort* pO^F: 
ushort* pl“P+N/2; 
ushort* p2*P+N: 
ushort* tempO^P+2*M: 
ushort* t^mp l“t empO+N/2 ; 
ushort* temp2=tempO+N: 

// Main level of recursion; each level results in 3 calls to Multiply at a 
deeper level 
// the idea is: 

// P = U * V = (ul.uU) * (v1,v0) 

// where V is split into high order terms (ul> and low order terms 
(uO): 

// P = u Tv 1 f u | *v0 + uO*v 1 * uO*vO, 

//The terms can he rearranged,so that only 3 instead of 4 


multiplications are needed: 

// F = uTvl, uPvl + (ul-uO) * (vO-vl) + ul)*vl>. uO*vi) 

//The downside is that products must he computed into temporary 
space and copied 

// hut the upside is that, with recursion, much fewer operations are 
carried out. 

// Running time is proportional to N " LS8 lor square problems 
// (size<U)=sizc(Y)=N) 

Multiply(uO.vQ,temp2,N/2*nv); 

Accumulate(pO,tempi,N); 

Accumulate(p1,temp?*H) ; 

Multi ply(ul*vi.temp2*U/2 * nv); 

Ac c umu 1 a te (p 1, t etnp 2 * N) : 

Aecumu]a te(p2,temp? ( N); 

int negative^Subtract(uI,uO.terapO.M/2); 
negative Subtract(vO*vl* tempi.M/2); 

Multiply(tempo,temp]* temp2J/ 2 ,nv); 

if (negative) 

Ne gAce umulat e(p1,t emp2 P N) : 
else 

Accumulate(pi.temp? *N); 

1 else //v 1=0: the terms involving v] arc not needed 
l 

const ushort * uD=U ; // pointers into the allocated space 

const ushort* ul^U+N/2: 

const ushort* vO^V; 

ushort 1 pQ=P; 

ushort* pl=P+N/2: 

ushort* tempO=P+2* N: 

// Optimizes the case of asymmetrical problems (V much smaller than 
U). 

//The first or first few recursions may need only 2 multiplications, hut 
deeper levels 

// may not be asymmetrical and the main scheme (above) will kick in 
then. 

Multiply(uO> vO t tempo,N/2,uv); 

Accumulate(pO.tempo.N); 

Multiplyfut, vO t tempo.N/2.nv): 

AccumulateEpl,tempO,N); 

\ 

\ 

along Roundup(ulong M) 

// Rounds N up to a value X * 2**Y. where X <= kMiilliply Threshold. 
//This ensures that terms can be split Into equal halves recursively 
// until there are <= kMuhiply l hreshold terms. 

I 

along m&sk=-!»m2; 

while ((m2' i mask>> 1) >N) mask=m2; 

mask -= mask>>kMTbits; 

if ((M & mask) < N) 

M - CM & mask) + (mask ht { mask>> (kMTbits -1) )) ; 
return N; 

I 


BigMult.h 

typedef unsigned short ushort: 
rypcdcl unsigned long ulong; 

// Constants and prototypes for the faster multiplier 

enlim { 

kMTbits * 4 * 

kMultiplyThreshol d * ( H<kMTbits)-1 

h 

void Multiply(const ushort* U,const ushort* 

V, ushort* P.const int N.const long nv); 
ulong RoundUp(ulong M); 

m 
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Another way to sell software 


MindVision Software, creator of Installer VISE, introduces eSellerate, the quick ond easy way to 
speed up your online sales. Designed especially for developers like you, eSellerate puts instant 
gratification into the hands of your customers. Now, your application con sell itself with no 
manual intervention from you. None, nothing. Nada. WWW. esellerate.net 




TOOLS OF 
THE TRADE 


By William Porter 


Lasso Studio for Dreamweaver 1.5 


Web database 
programming for the 
rest of us? 


Introduction 

Lasso is a lag-based 
programming (or, if you prefer, 
scripting) language used to send 
instructions to the Lasso Web Data 
Engine (WDE). The Lasso WDB runs 
on a web server as a plug-in or CGI. 
where it is typically used as 
middleware to enable the web server 
software to talk to a back-end 
database such as d> or FileMaker 
Pro. While the Lasso language itself 
is fairly high-level, it is nevertheless 
a reasonably complex language with 
hundreds of tags, and the fact that 
Lasso code gets scattered around in 
the HTML code of web pages makes 
writing it and reading it somewhat 
difficult. Until recently, Lasso 
developers had no choice but to rely 
entirely upon text-editors like 
PR Ed it to do their coding. But with 
the release of the Lasso Studio for 
Dreamweaver (LS/DW) in December 
1999, Lasso developers finally got a 
graphical interface u> work with. 
And with the version 1.5 update, 
released in early Spring 2000, the 
LS/DW is ready for prime time. Lasso 
hasn't gotten any easier and doing 


advanced work with Lasso still requires that you get 
your hands dirty. Rut building a basic Lasso-powered 
site is now truly within the reach of non-programmers. 

I he LS/DW package from Blue World replaces what used 
to lx? known as the Lasso Developers Edition. The former 
Developers Edition was about testing and nothing else. It gave 
the developer a restricted-use copy of the lasso W'eb Data 
Engine ( WDB), so you could web-enable and lesi your pages 
on your development machine or demo them for your client, 
the Ljsso Studio for Dreamweaver provides this as well, but 
it adds a set of extensions for Macromedia’s powerful web site 
design program, Dreamweaver, so you can build lasso pages 
right in Dreamweaver, using the Lasso wizards and tag objects 
as supplements to create pages quickly and with a minimum 
of direct involvement with the underlying code. What if you 
don't use Dreamweaver? Then part of the Lasso Studio for 
Dreamweaver will be a waste of money for you, and you 
cannot buy the wel ^-enabling part of the Lasso Studio without 
the Dreamweaver extensions. (Adobe recently announced 
that Golive 5 (their web-page editor) will lie extensible in the 
way that Dreamweaver is already. Since the Law) Studio for 
Dreamweaver extensions are written in JavaScript, it does not 
seem unrealistic to hope that Blue World will provide a Lasso 
Studio for GoUve in the future as well. Out Blue World has 
announced no such plans.) 

Like Ltsso itself, the Lasso Studio for Dreamweaver 
does not care much what DBMS it interacts with, Lasso 
WDE can communicate with 4D, FileMaker Pro and ODBC 
data sources. For the purpose of this article, we are 
assuming that the database being published is running 
under 4D Server. 

Tiil Configuration Wizard 

Let's imagine that you have kept your used 
bookstore's inventory in 4D for years and now you want 


William Porter, Ph.D., Ls the owner of Poly trope Solutions, a database development firm in Houston, Texas, specializing in 
4D, FileMaker Pro and lasso projects. You can write him at wporter@polytlope.oom. 
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to put the inventory online using the Lasso Studio for 
Dreamweaver In order to get started, open the database 
under 4D Server, crank up the Lasso Web Server and 
finally, launch Dreamweaver If everything is properly 
installed and configured, you’ll see a number of new 
items in the Dreamweaver Commands menu (see Figure 
1 ). 


Commands 


Start Recording 


Fitly Recorded Command 


Cdit Command List.*, 


Get More Commands-. 


Clean Up HTML- 
Clean Up Word HTML— 

Add /He move Netscape Resize Fix.,. 
Optimize image in Fireworks.*. 

Create Web Photo Album 
Apply Source Formatting 

Format Tabie~ 

Sort Table.,* 

Set Color Scheme... 

About Lasso Studio 

Lasso CDML Converter 

Lasso Configuration Wizard 

Lasso Database Selector 

Lasso Form Builder 

Lasso LDML Updater 

Lasso Site Builder 

Register Lasso Studio _ 

Figure L 


If you are working on your site for the first time, the 
Lasso Studio will need to know some things about your 
database files: their names, the names of the fields, layouts 
and value-lists in each file. Gathering this information is 
the job of the Configuration Wizard, which uses Lasso to 
query the databases and store this information in a 
“snapshot" file. 



Figure 2, 

The snapshot file is the key to everything. Without it, 
you can't work. With it, you don’t even have to have 4D 
or the Lasso Web Server open to create Lasso pages in 
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USB pons 


One serial 
and twelve 
USB ports 
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two serial and 
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Think about it 

Why should you 
have to buy a 
USB hub, then hang 
stuff off of it until it 
looks tike something out 
of Edward SCiSsomndsT 

; 

Why fumble around 
under your desk every 
time you want to plug in 
another device? 
Instead, try this: A modular, 
stacking system of 
USB hubs, with adapters 
for serial. SCSI and more. 
Neat. Compact. And, oh yeah... 
drop dead gorgeous. 


Belkin Com portents 
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Dreamweaver, Ibis makes it possible for teams of 
developers lo share snapshot files without actually sharing 
the databases or needing to have Lasso running on every' 
machine. And if you work on multiple projects, you can 
create multiple snapshot files, name them, then load the 
one you need for your current work session. 

Considering the importance of the snapshot file, it's 
unfortunate Lhat the Configuration Wizard, which 
creates it, is the weakest part of the Lasso Studio, If you 
want to create different snapshot files for different 
projects, you'll have no choice but to do that manually, 
because the Configuration Wizard does not ask you to 
name the file it creates. More seriously, some users have 
found it difficult or impossible to use the Wizard with 
success, although the latest release of the Lasso Studio 
for Dreamweaver extensions fixed all the problems I 
myself experienced earlier, it is important to keep in 
mind that the LS/DW configuration wizard will only 
work if you have Lasso installed properly installed and 
configured properly and if your database is properly 
registered with Lasso security. These are tasks that 
beginning users — LS/DW ;s audience — sometimes find 
confusing. Fortunately, as a last resort, it’s possible to 
create a snapshot “manually,” if you have to. 

When the configuration wizard is done, iL will display 
the names of ail the data sources it found (the names of 
your open files) and ask you to select one to work with. 
You can change your selection at any lime later on by 
using tiie Database Selector dialog (Figure 3). 



Figure 3- The Database Selector dialog. 


Lasso Studio Basics 

The Lasso Studio for Dreamweaver adds four pages to 
the Dreamweaver objects palette. These contain icons dim 
you can use to insert tags that access data sources, tags 
that create Lasso forms, tags lhat rely upon Lasso 
extensions, and programming tags (like conditions, 
tokens, file manipulation tags, and others). 



Figure 4 The Lasso Form objects. 


For example, you can create a one-page Lasso search 
form using the Lasso Form page of tile palette (Figure 4). 
With a blank document open, click on the “Lasso Form 1 * 
object to insert a form area. (For some reason, the Lasso 
Studio will place the form at the top of the editable area 
regardless of where the insertion point is. You can cut arid 
paste the form where you want it to lie if necessary.) 
When a new form is created, the Lasso Studio 
automatically inserts a few objects inter the form for you: 
objects that let you define the database to be searched, 
the layout to be used, and an object that identifies the 
web page dial will display die resulting hit list. When you 
build a page “manually” this way, you must dick on each 
of those objects and supply a parameter; [hat is, select the 
response page object and in the Dreamweaver object 
properties inspector, enter the name of the .lasso page to 
be used as your format file (Figure 5L 


k m : 51 

last name: 1 



n 


Tag f-Response 

*1 



F j| e | litting.lwsfli 

lea CS 


Figure 5. The response page object shown above has 
been selected inside the Lasso form, and the parameter 
required by that tag (the name of the response or format 
file) is entered in the Dreamweaver object properties 
inspector. 
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The icon of the clicking arrow shown as the first tag 
in Figure 5 is the action tag, which specifies the action to 
be performed when the user clicks on the submit button. 
For a search form, that action would l>c “’Search." Like the 
other Lasso objects in this row on the page, the action 
object represents a hidden input tag in the HTML. 
Remember; GUI and WYSIWYG are not synonyms! The 
Lasso Studio for Dreamweaver provides a graphical-user 
interface for inputting programming tags, but to an even 
greater extent than Dreamweaver’s own page-editing 
interface, the Lasso Studio GUI is not WYSIWYG, With 
any luck, when your site is deployed, what you'll get on 
most of your Lasso pages is data, and thaL is one Lhing you 
never see when you're working in Dreamweaver. 

Anyway, once you have all the hidden input tags the 
form needs, you just throw in a few search fields (using 
the same page of die objects palette) and add a submit 
button at the bottom of the page and you're done— 
without writing a single line of Lasso code and wiLhout 
ever having to open up Dreamweaver's HTML editor! 

The Site Ruteder 

But wait, it gets better. Why build individual pages 
one tag at a time, when the Lasso Studio can automatically 
generate all the pages for your entire site? Well, maybe not 
your entire site, but the Site Builder does build sets of 
related pages. 
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You start by selecting a "site action” in the Site Builder 
dialog (Figure 6), and then the Site Builder asks you a 
series of questions: what fields you want on each page; 
what field to use as the link-to-detail field on the hitiist 
page; whether to include a "find all" button on the search 
page; and so on (Figure 7). 



Figure 7. the lasso Site Builder walks you through the 
choices you need to make before it ca n build the page set 
for you. 7 his screen shot shows the options available far 
the hit list page, including (at the bottom) whether the 
linked detail page should be a display or an update page. 

When you get to the end of this interview process, 
the Lasso Studio performs what many older Lasso users 
w ill regard as a nothing less than a minor miracle: it 
creates an entire set of ready-to-run pages for you, in 
less than a minute. Once again, you did not have to 
write a single line of code — and this time you did noL 
even have to type parameters in the object properties 
inspector. The Tasso Studio for Dreamweaver Site 
Builder is the star attraction in the package and 
beginning users will love the Lasso Studio for this 
feature more than anything else. 

Lasso Studio for Dreamweaver 1*5 si ill has the 
Form Builder that was introduced in version I 0. The 
Form Builder creates single pages and is particularly 
useful for editing the page sets generated by Site 
Builder. You can, for example, use the Form Builder to 
add a new page, then simply tweak the sequence of 
links in the revised page set. 


Together, the Site Builder and the Form Builder 
allow developers to create a working draft of a basic 
she very quickly. Of course, the Lasso Studio does nol 
make your pages look good for you., but it does not 
get in your way, either. When you use the Site Builder, 
you can tell it lo use a Dreamweaver template and 
what editable region of that template to insert the 
Lasso code into, so elements like site headers and 
common menus can be placed directly into the Lasso 
pages by the Site Builder. 

Beyond the Basics 

Yes, there is a catch. The Site Builder does what it 
does and that’s all that it does. For everything else, 
you’re on your own with the Lasso Reference Manual. 
Working with Lasso remains a form of programming, 
and especially if you want to go beyond the basics, 
you will need to understand Lasso's programming 
logic, because the GUI requires that you know not just 
what tags (objects) to insert, but also what parameters 
to add to lags, and in whal order to insert tags. And 
ironically, when you know enough to do ii using Lhe 
Lasso Studio’s GUI, you know enough to do it without, 
so die advantages of the GUI seem less clear. 
Advanced developers may even feel that using the GUT 
is more trouble than working with the code directly. 

One of the places where this limitation is most 
evident is in the way the Lasso Studio handles inline 
Lags. Inline tags are placed within the format file that 
displays their results and they are processed before the 
page is displayed. For this reason, they are never seen 
by end users, either in the browser’s location field or 
in the source code window. So, for example, you 
might create a page named list everything, lasso” 
which includes this inline: 

finline: datasource”* Books.AD f * table= + books'„ 
key field- ' ID' . Rortfleld^ 4 author last 4 , fircds.Hl 

t records] 

[Held: 1 uuihot_lmU ' ] ► [field t *-auihor_first 1 ] : 

<1>[field: ‘ title T ]</i> 

[/records] 

[/inline] 

This simple code will find all the records in the 
database “ Books.4 D," sort them by the author's name, 
and display a hit list showing two fields, “author” and 
“title.” Best of all, no information about your databases 
will be revealed in the source code for the page. Most 
advanced Lasso developers prefer to use inlines as 
much as possible. Yet Blue World does not promote 
their use energetically. The Lasso Studio wizards create 
page sets exclusively using the traditional tag types. If 
you prefer to use inlines, then the lasso Studio for 
Dreamweaver’s strongest feature — the Site Builder 
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will be wasted on you. And creating an inline in the 
Lasso Studio is, in my opinion, more difficult than it is 
to type llie same code into the HTML editor by hand. 
Here is the inline inspector used to create the same tag 
that was shown on the previous page: 


Lasso Tag Editor 


Name 

Value 

C'itasourc* 

Books ,4D“ 

Tabte 

’Books' 

jiyFteld 

i'liy 

SortHeld 

| author last 

(Action# 

tlMAIi 




1 


I 


1 


1 


Cods Preview n 


[hi I in# D<slasourcfr= 'Book* ,4D L , Tab Is-"Bocks', KfyFiMd- 
J ID\ Sortf wld^'iurhoraart:', FindAtlj. 
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El 

El 
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Figure 8. The Lass o \fag Editor, 
being used to create an inline lag. 
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I am a California Lawyer foeusing on Intellectual 
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The down side to inlines is that they are somewhat 
more complicated conceptually than traditional tags. 
Processing an add or search form using an inline in the 
response page rather than hidden input tags in the 
form page itself requires careful use of the 
[form_parain] tag at a minimum, and in some cases can 
require the use of tokens to pass data from one page 
to the next. 

In some cases, you simply cannot use the Lasso 
objects to insert code and must type it in manually. For 
example, it is common to use form parameters or 
tokens or cookies in links that conduct searches: 

<u href— M action . lasuo?-da£agource = Books.4D&- 
respQnse=vievcart, lasso& 

table = books&cust omer_ID~ L t oken_value : ’ customer_id 
’J&-searchJ">Click here to view the items in 
your shopping cart(/a> 

t hat link cells Lasso to go to the layout “web” in 
the database “items" and find all the items that have 
been selected for purchase by this customer, based on 
the value of the token “customer JdC Now there is a 
Lasso token object in the objects palette. But you 
cannot insert an object—Lasso object or oilier kind of 
object—into the object inspector's link field. And since 
the link field is so small, you will almost certainly want 
to type that Lag into your HTML editor instead. 

Availability and Pricing 

The Lasso Studio for Dreamweaver provides you, 
the developer, with two things: (1) a lesting-only 
version of the Lasso Web Data Engine, with all the data- 
source modules (40. FileMaker Pro and ODBC), and 
(2) Lhe extensions for Dreamweaver You must supply 
the databases and your own copy of Dreamweaver 
3.01. A thirty-day evaluation version of the Lasso Studio 
for Dreamweaver can be downloaded from Blue 
World's web site: h tip ://www.blueworl(L com/down load/. The 
Lasso Studio for Dreamweaver can he purchased 
directly from Blue World Communications, As of mid¬ 
summer 2000, the boxed version (with CDs and printed 
manuals) has a list price of $349; the electronic 
(downloaded) version is priced at $299. 

Conclusion 

On balance, version ! ,5 of rhe Lasso Studio for 
Dream weaver is a winner. The Lasso Site Builder is a 
godsend for beginners and a time-saver even for 
experienced developers. As we have seen. Its difficult or 
impossible to do everything using the Dreamweaver GUI, 
and 1 lard hard-boiled Lasso coders may will not want to 
give up their favorite text editor, . lint But l thought of 
myself as at least a medium boiled coder, and 1 have 
learned that I can use BBEdit and the Lasso Studio for 
Dreamweaver side-by-side to very good effect. Bui 
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FROM THE 
FACTORY FLOOR 


By Richard Atwell, ©2000 by Metrowerks, Inc., all rights reserved 


The Legend of Arnold’s Gold 


Ever since GodeWarrior DR/1 
shipped buck in laLe 1993, 
CodeWarrtors have been asking for 
keystroke navigation features and 
other shortcuts for just about every 
part of the IDE, If you’re like me, 
these manage to remain secret over 
time because ir T s time consuming to 
read the manuals every release to see 
what’s changed, Some of these are 
not so secret but they are worth 
mentioning anyway. 

With that in mind, here's the 
torrid expose that dares to reveal 
them all. 

Search Results and 
Error Message Windows 

j M.j: o ption ,1 — ft] jjJ 

Cycle through list of found items 
when the keyboard focus is on the 
editor pane. For searches, ihc text 
that was found is highlighted as you 
navigate through the list. 


you to view different parts of your file at the same time. 

The icon just above the splitter toggles the toolbar 
position between the iop and bottom of the window, 

* * 

Double-click on a word in the editor selects it. 


* * * 

Triple-click on a word selects the whole line that 
contains the word* 

I and Ej JTj 

Moves the insertion point to the beginning or end of 
the document. 


option j wd [t | 1 iTf 

Moves the insertion point to the top and bottom of the 
visible page. If you are already at the top/bottom, pressing 
this key combination again will take you to die 
next/previous position. 


! shift ] and ^ 


Editor Window 

1. *I *R 


Select the text between the last and current insertion 
point. This can also be used ro extend a text selection m 
either direction* 


With a source file, opens as 
corresponding header file or vice versa. 

The button just above the vertical 
scroll bar is a pane splitter that allows 


xi shift j=4tj 1 1 j 

Selects all the text or extends the selection between 
the insertion point and destination. Follows similar logic 
as non-shift case. 


Richard Alexander David Atwell, a k a* Rat well." is a Mac OS Debugger Engineer at Metrowerks and is responsible for 
making MetroNub do nasty things so you can debug your code* Good ideas lot CodeWa trior t-shirts cm lie sent to 
ml well® met it Jwerks.a mi. 


84 


From the Factory Floor 


MacTbch * August 2000 

























option ] ; ft] |jJ 


Sc lea/ext end the text between the insertion point 
and destination. Follows similar logic as non-shift case. 


control 


and 


It 


Navigate sub-words by case. For example, if the 
insertion point is at N Debug" within "DebiigText", the 
insertion point will move to the start of 'Text". 


shift 


contra! 


Extend a text selection within using the above logic. 


optio n | and ^ 

When you have browsing active for your project, 
option-click on u symbol name Lakes you to the definition 
of the symbol, if there is only one. If there are more than 
one, the Symbol Browser window opens up, 

_* 1 - ^ 

Same as above but searches using the reference 
application specified in the IDE Extras preferences panel 
as a backup. 

Hierarchical Lists 


I—Hi -lfcl L2J 

Collapse/expand a node and all its sibling nodes. We 
call i his Vide disclosure.” You can also dick the mouse 
instead of using the left and right arrow keys. 

[^torTj ^Ld Id 

Collapse/expand a node and all it's sub-nodes. Again, 
you can also dick the mouse instead of using the left and 
right arrow keys. 

i_ ld 

Combine the above behaviors and perform a deep 
and wide disclosure, sometimes called recursive. 

Project Window 

'typing while viewing the Files page takes you to the 
file with the nearest alphabetically matching item or 
group (the item must be visible, i.e. not be in a collapsed 
group). You can see what you are typing ai the bottom 
of the window. 

Typing while viewing the Link Order page takes you 
to the file with the nearest alphabetically matching name. 


HU 

Thereafter, pressing the tab key takes you to lIic next 
item that matches the text you typed. 

You can drag files or projects from Finder onto the 
Project Window to add them to a project. Tf you have 
more than one target per project you will be asked which 
targets to add those files to and iliey will be filtered by the 
target’s file mapping settings. 

In the Files page, clicking on a header sorts using the 
Items in that column. Clicking on the button to the far 
right of all the headers when a column is sorted toggles 
the sort direction much like the behavior of the Finder, 


return 1 

In the Files and Link Order pages tries to open that 
ilem in the editor. 



In the Files page edits the name of the selected group. 



In rhe Targets page opens the target preferences for a 
selected item. 




Server4D 
http://www.mdg.com 


WS4D/eCommerce 
a single application 
that does itali! 


Web Server 
Database Publisher 
eCommerce Server 
Handles Virtual Domains 
and all your Databases 


Hosting Services Now Available 

• WS4D & WS4D/eCommerce Hosting 

• Co-Locating (including 4D & 4D Server) 

• We are 4D & 4D Server experts and have 
been working with 4D since 1988. 

Database Hosting $50/month 
eCommerce $100/month 
Co-Locating $400/month 

To find out more about MDG Hosting, visit: 

http://mdg.com/hosting.html 
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fn ihe Targets page, all project commands apply to 
the selected item, so you can use continuous and 
discontinuous selection to select which takes to build, for 
example. 

I_ deiete i 

In any of the project pages, presents the delete item dialog. 

Compare Files Window 

You can drag and drop files and folders from the 
Finder into the icon wells at the left of the window. 

Breakpoints and Watchpoints Windows 

Click on the red dot next to the name of the 
function/filename toggles the state of all breakpoints in 
the list. 


current program counter register forward or backward to 
change the next line to be executed. Be sure you know 
what you are doing when you attempt this, be,, don't 
move the arrow into prologs or into other functions. 

Clicking the small document icon at the top left of the 
editor pane opens the source file in an editor. 

Clicking the small dot icon at the top left of I lie Variables 
pane toggles between all the variable display modes. 

Any Window 
; oprionj -mi ^ 

In the close box of the window title bar of a 
document window closes all windows of that type. For 
example, all editor windows or all project windows or all 
variable windows, etc. 


| return i 

For watchpoints or breakpoints an editor window will 
open that reveals the selected item. 

List Views 

You can use type ahead in the list views to select the 
item with the nearest matching name. 

Use can use the arrow key to navigate within the list, 

Variable and Register Views 


return i 

Hdit selected values. 


I—ad - * 

On the title bar of a window to move it without making 
it the front window after you release the mouse button. 

Find Dialog 

IZ3Q 

Cancel a find. 

Drag files from the Project Window onto the files list 
to add them to the search. 

Drag a folder front the Finder onto the files list to add the 
contents to the search to find reeuisivdy (use with caution as the 
list can take a long time in build with huge directories). 


□ a 

Navigate within the list. 


Toolbars 


3ft| control | md 


* 


control [ and ^ 

Bring up a contextual menu of applicable items from 
the Data menu, 

* * 

Doublec lick on a variable will open it in its own window. 

Expressions Window 

Drag and drop variables to this window. 

Drag names from the register window to tins window. 
Use ®>R1 (option-r is the copyright character) to 
specify registers by name. 

Stack Crawl Window 

You can drag the blue arrow that represents the 


Remove items from the toolbar. 


control 


Mouse over a button will display the balloon help for 
that item. 

Credits 

Thanks to Max and everyone else at Metrowerks who 
helped to collect the information for this article. If you’d 
like to gel in touch with us about Code Warrior issues, 
post in our newsgroup or email us directly. 

• Newsgroup: comp.sys.macprogrammer.codewarriGr 

• Technical Support; cw_support@metrowerks.com 

* Report Bugs; tw_bug@metrowerks.eom 

* Suggest ions: cw_suggestion@metrowerks.com 
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MAC OS X 


By Andrew C. Stone 

Installing Mac OS 9, OS X and X Server 
on a G3 Laptop 


During these hybrid limes, 
Macintosh developers are 
concurrently developing software for 
Mae OS 9, Mac OS X, Mac OS X Server 
and Darwin, 1 realized it would be 
optimal to allow my 1 year old and 
hopelessly out of dale Wall.Street G3 
laptop to boot off of any of these 
systems, without dragging around an 
external hard disk. IPs possible to do 
this, bur you have to be careful about 
the order of installation and the order 
and size of partitions. With some tips 
from Joe Keenan from Apple, 1 was 
able to accomplish the install without 
too much trouble. This article will go 
over the process step by step, with 
tips and tricks along the way. 

Step I. Make a partitioning plan 
for your internal hard disk. 

The most important step is for 
you to determine how you want to 
carve up your disk. If you consider 
the fact that new versions of OS X 
are coming out fairly regularly, then 
the partition devoted to OS X should 
not contain any vital source or 
“permanent' 1 files. Since Mac OS 9 is 
stable, you might consider that 
partition as the place Lo keep 
important files and data. You'll want 
at least 3 HFS extended partitions. 

If your disk is larger than 8 
gigabytes and your laptop has the 
“Old world ROM" (WallStreet and 
earlier models), you'll need to squeeze 


the operating systems onto the first 8 gigs. Old World 
machines did not implement the necessary standard for 
doing ATA block reads past 8GB, so all boot partitions 
must begin before 8GB. You might consider making a 
large forth or fifth partition of the remaining disk space if 
you have a large capacity hard drive. 

Because the newer boot loader that comes with X 
can boot either OS X or OS X Server, while the Server 
boot loader cannot load X, you have to install X on a 
partition before Server. Since you need a Mac OS 9 
partition Lo run various USB devices at the time of this 
writing anti the boot chooser “System Disk" runs as a 
Mac OS 9 System Extension, 9 needs to he installed on 
the first partition. This will allow you to hoot with the 
option key down and select one of the various 
operating systems from which to boot. 

So, on an 8 gig drive, you might divide it up into 3 
equal partitions of about 2.6 gigs each, and install Mac OS 
9 on the first partition, Mac OS X on the second, and Mac 
OS X Server 1.2 on the third Because Darwin LO is based 
on the exact same code as OS X, you'll be able to build 
and tinker with Darwin on the OS X partition beginning 
with Developer Preview 4. 

NOTE - if you have trouble with any of these steps, 
ymi might try hooking a SCSI disk to your laptop. I 
noticed that booting off of the CDs sometimes hung, 
hut when the external SCSI disk was connected, it had 
no trouble booting. 

lie sure you have the following Apple CDs, or later 
versions where applicable: 

* Mac OS 9 

* Mac OS X Install CD 

* Mac OS X Server 1.2 

* DeveloperCD 


Andrew Stone <andre w©stone.ojm> is the chief executive haquer at Stone Design Corp <http;//www stone.com/> and divides 
his time Itetween raising children, llamas & cane and writing applications for Mac OS X and playing with Darwin. 
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Step 2, Partition the hard disk and Install Mac OS 9 

Warning! Following these instructions will completely 
wipe clean your Poti’erBookJ He sure to bach up everything 
to an external dish or network. 

A, Insert the Mac OS 9 CD Premium and Select 
Developers received OS 9 in October l999 T s mom lily 
mailing. 

H. Boot off the CD by holding down die C key white 
I looting. If that doesn't work, try holding down the 
option key! If that fails, reset the Parameter Ram by 
holding down Option-Command-P-R while rebooting. 
You'll hear a second start up lx>ng which indicates that 
the old settings have l>ecn reset to defaults. 

If you plan to install Linux as a fourth operating 
system, you'll need to learn the command line tool 
“pdisk", which lets you partition the disk and assign non- 
Apple types to each partition. Moreover, you can erase 
certain partitions without destroying the data on the 
others. Otherwise, you can get by using the GUI 
application “Drive Setup" provided by Apple in 
IJtilitics/Drive Setup / on Mac OS 9. 

C. Partition your hard disk 

a. Stan the Drive Setup application to partition your 
disk according to your plan, 

b. Select the Internal Drive (AYA 0 0 0) 

c. Click “Initialize" 

d. Click “Customize" 

e. Choose the number of partitions you desire, such 
as “3 Partitions" from the pop up button 

f. Click in the area which represents the 3 partitions 
and resize each to your desired plan 

g. Chcxjse HFS Extended LI1FS+) as the file system 
type for each of these partitions 

h. Click “Initialize" and ‘QK" 

D. Double-click “Mac OS Install" and click away until 
you can select the partition to install Mat* OS 9 on - 
choose the first partition and dick install. 

E. Reboot and remove Mac OS 9 CD, 

Step 3- Install Mac OS X onto the second partition 

A. Insert Mac OS X Install CD 

B. In order to switch between operating system, you’ll 
need to install the System Disk Utilities. 

Copy the application System Disk in Mac OS X Install 
CD/Utilities/System Disk Utilities/ to the recently 
installed Mac OS 9 disk. 

C. Douhle-diek Install Mac OS X application 
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a. Tills will pul up a panel that explains the reboot into 
OS X - click "Continue* 

1> After relating, tile installer gets loaded, dick 
Continue, Agree, OK... 

e. Choose the second partition and click all the OKs 
d. OS X will get installed, and then will auto reboot 

!>. The Assistant’s Set Ip module automatically appears 
so you can configure your computer 

Jusi like in OS X Server, you can configure the following: 

* keyboard, root password, Web, Quick time Streaming 
and Apple Pile servers 

* ethernet ports, hostname, router, inti mask, IP 
address, use Net Info 

* remote login, time zone, time, server con figurations, 
accounts, auln login 

You can always come back to these via 
/Systeni^Administ rat ion/Assistant ,app -> Set Ip Assistant 

Click restart to tcsJ your network connectivity and have 
these changes take effect* 

K. Install user applications. Check www.omnigroup.com, 
www.stone.com. etc. for the latest? 

G. Remove Mac OS X Install CD 

Step 4* Install Mae OS X Server 1*2 onto the third 
partition 

A. insert Mac OS X Server 1*2 CD 
Ik Hoot off of the CD or Mac OS 9 partition 

C. Dcruble-click t he install Mac OS X Server a ppl icatit >n 

a. Choose your installation language: Knglish, French, 
Gentian, Japanese. 

b. You’ll get a panel - “Mac OS X Server cannot be 
installed on this computer' 

c. Choose S|x.'dah>Conftgu rations 

d Click the check box “Allow installation on 
unsupported configurations’ 1 and u OK". 
e. Click a bunch of Ok's and M I Agree", 
ft Select the third partition, and OK, OK. 
g. The install continues and then auto reboots 

l>. t he Assistant’s Set Ip module automatically appears 
so you ran configure your computer 


Just like in OS X Server, you can configure the 
following: 

* keyboard, root password, Web, Quicklime Streaming 
and Apple File servers 

* ethernet ports, hostname, router, met mask, IP 
address,use Net Info 

* remote login, time zone, time, server configurations, 
accounts, auto login 

You can always come back to these via 
/System/Adniinistration/Asslstam.app -> Set tip Assistant 
Click restart to test your network connectivity and 
have these changes take effect. 

K. Remove the Mac OS X Server 1*2 CD as the 
cc >1 lif >u Le r reboc>!s. 

F. Install the Developer software 

a. login as Toot’ 

b. Insert the DevcIoperCD 

c. Install WebObjects and Development Tools; launch 

Installers pp by double-clicking 

WebOl >jecrsl )evek >per. mpkg 

d. Remove the DcveloperCD 

e. in sen the Mac OS X Server 1*2 CD 

ft This is important - WebObjects 4.0 “writes over” 
some upgraded files in Server 1.2, therefore, you’ll 
need to install this on lop of the Developer install. 
Double-click the + l lpdaieWO4.0_ Developer.mpkg 1 in 
/Mae_OS_X_Server 1.2/System/Installation/Packages/ 

g. Click Install 

h. Remove the Mac OS X Server 1,2 CD 

G. Install user applications. Check www.omnigroup.com, 
www.stone.com,www.stepwise.com, etc. for the latest! A 
suite of well design tools is available at: 

ftp://ftp.cs.unm.edu/pub/stone/MacOSX/ 

StoneWebTool5.1.4.m.P.btargz 


Conclusion 

being a freewheeling and footloose cross-platform 
developer is a irieky but obtainable goal. Turning your 
G3 laptop into a multi-OS boot machine is a 
worthwhile endeavor for mobile development and 
remote demos, and it realty impresses the Windoze 
users in the airplane seats next to you! Hj 
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by Jeff elites <online@mactech.com> 


Quartz and PDF 


As you’ve probably heart!, Apple’s new graphics 
system, Quartz, is based on PDF, You’ve seen screen 
shots of Quartz, and undoubtedly you've encountered 
PDF documents before, but that’s probably where your 
knowledge of PDF ends, While you really don't need 
to know anything about PDF in order to develop 
applications for Mac OS X, it always helps to know a 
little bit more about the technologies you are working 
with, so that you can Fully leverage them in developing 
your products. This month we are going to take a 
closer look at Adobe’s PDF and its role in Apple’s new 
imaging .system. 

So what is PDF exactly? The acronym stands for 
“Portable Document Format M , as you probably know, 
and it is fundamentally a file format. In fact, Adobe's 
description, stated at the beginning of their PDF 
Reference Manual is, “PDF is a file format used to 
represent a document in a manner independent of the 
application software, hardware, and operating system 
used to create it, A PDF file contains a PDF document 
and other supporting data.” This is in stark contrast to 
PostScript, which is a full-fledged programming 
language. So at first blush it may seem a bit strange to 
base a graphics and windowing system on a file 
format—Apple refers to PDF as a superset of 
PostScript, but now this seems somewhat like calling 
Photoshop a superset of C++. So what’s the deal? 
Things begin to make a little more sense when you 
learn that PDF (and specifically, a PDF file) has four 
conceptual parts: a set of basic data types, a file 
structure, a document structure, and a page 
description. It is this last part, the page description, 
which is the core of PDF-as-a-graphics-model. 

The Adobe Imaging Model 

PostScript and PDF are based on the same 
conceptual imaging model, sometimes called the 
Adobe imaging model. At the most basic level, this 
model is no different from that of QuickDraw or most 
other 2D graphics systems: you create an image using 
operators which move a virtual pen to place marks on 


a canvas. In PostScript, you have primitive marking 
operators and in addition you have programming 
constructs such as loops and variables. In PDF, you 
retain these basic marking operators (and add others), 
but without the additional programmatic infrastructure, 
so a PDF document ends up being a description rather 
than a program. As a simple example, a page with 30 
circles on it might be created in PostScript by placing 
the circle-drawing instructions in a loop which iterates 
30 times; in a PDF file, this would be represented by 30 
separate circle descriptions. As a consequence, a PDF 
document is potentially larger than a PostScript 
document, but it doesn't require the overhead of an 
interpreter to draw a page, iL can render faster because 
the primitive marking operators are implemented 
directly in machine code, and it is easier to manipulate 
because strings and other components can be reliably 
located within a document (in PostScript you really 
have to “execute” the entire page first)* You can think 
of this aspect of PDF as a RISC version of PostScript. 

So, basing Quartz on the Adobe imaging model 
really means basing its primitive marking operators on 
those of PDF (and consequently of PostScript). These 
operators live in the part of Quartz called Core 
Graphics Rendering, (I'll call this “CG” for short, as 
Apple seems to have not officially named their new 
graphics model. I'll avoid just calling it “Quartz”, as this 
includes Core Graphics Services, which is essentially 
the window server.) As I mentioned above, there isn't 
a huge conceptual leap from QuickDraw, but that 
doesn't mean that there aren't huge advantages. For 
one, distances in CG are given as floating-point 
numbers rather then integers, and can be in real-world 
units such as inches and centimeters. This difference is 
profound, as it largely divorces the drawing process 
from explicit concerns of screen or printer page size or 
resolution, and reduces such things to primarily a 
scaling issue. It s also fundamentally vector-based, so 
you’re not tempted to draw a single "pixel”, although 
even in QuickDraw one tends Lo do this by drawing a 
1 x 1 square. Also importantly, CG has a sophisticated 
set of text layout and graphics transformation 
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operators, so finally it will be easy for a Macintosh 
programmer to rotate text and images on the screen. 
And on top of PDF's core, Apple has added features 
such as composition and translucency, It wouldn’t be 
surprising it these were to migrate back into a future 
version of the PDF specification, (Also note that CG is 
based on PDF 1.2, rather than the current version 1,3, 
but Apple plans keep pace with the Adobe's 
Specification as it evolves.) 

Core Graphics Rendering ai the Center 

Core Graphics Rendering serves as the hub of 
drawing activity, accepting instructions using its native 
C-based API (which you'll likely access through a 
higher-levd framework), QuickDraw commands, PDF 
files, or possibly other input sources. From here it can 
render them to the screen, create raster data for a 
printer, or record them in a format such as PDF or 
PostScript. (It's fairly trivial to record a sequence of CG 
drawing operations to a PDF document, much as a 
PICT could store a recording of QuickDraw 
commands. It s easy to forget that PICT is actually a 
vector format, isn t it?) Note that this doesn’t mean that 
all graphics, before displaying it) the screen, exist as 
actual PDF documents. 

There are several key advantages to this 
arrangement. First, it brings the conceptual simplicity 
that Display PostScript brought to NeXT's operating 
systems, namely a .single graphics model for both screen 
and printer. This makes things such as prim preview and 
print-LO-file trivial, since PDF is the default spool-file 
format. This also means that you can get perfect output 
from cheaper, non-PostScript laser printers, and it opens 
the door for a new generation of “dumb” printers with 
minimal computational power, because the operating 
system fundamentally understands how to render 
documents all the way to raster data at printer 
resolutions, (This is a tactic used by the first generation 
of laser printers produced by NeXT, which were cheaper 
and operated at a higher resolution than other printers 
available at the time, and which Pm excited Lo sec finally 
make it to the Macintosh. It always seemed like a waste 
to pay for a slow processor which sii.s mostly idle in a 
printer when there Ls a much more powerful processor 
available in your computer.) Core Graphics has many 
technological improvements over Display PostScript, but 
it also has the very clever advantage of freeing Apple 
from Adobe's licensing fees and restrictions while 
maintaining a very similar API which allows long-time 
Open Step developers to leverage ilieir past experience. 


Reading Assignment 

In the coining months I hope to cover additional 
aspects of Mac OS XN new graphics environment. Until 
then, you have some reading to do. First and foremost, 
you should read Apple's inside Mac OS X: System 
Overview, In fact, you should read the whole thing, from 
cover to cover, and then read it again, because it T s all 
important information that you’ll need to know as we 
move forward with Mac OS X, There are also several 
articles on the Ars Technica w eb site which augment this 
same material, including an article specifically on Quartz 
and Aqua. Second, take a look at Adobe's PDF 
specification -it's large but fairly readable. You won't 
have to know ihis information directly in. order to use 
Core Graphics, but it helps to know a little bit about 
PDFs in greater depth, since you'll be working with a lot 
of them. This reference also spells out the connection 
between PDF and PostScript more fully, If you're 
interested, you might also do a little light reading on 
PostScript, mostly for perspective rather than for the 
details, Adobe's PostScript Language Reference has a 
great deal of explanatory material, and you can also 
download the electronic version of Glenn Reid's 
Thinking in PostScript book, which is much shorter, 
(Somewhat ironically, even the PostScript references 
come in PDF form ) 

Inside Mac OS X; System Overview 

<http://devworid.dpple.com/techpubs/macosx/System/DocumenTation/ 

Developer/SystemOverview/SystemOverview,pdf> 

Ars Technica: Mac OS X Update: Quartz & Aqua 
<http://www,arstechnica.com/reviews/1q00/nnacos-X'gui/ 
macQS-x-gui-l.html> 

Portable Document Format Reference Manual Version 1.3 
<http://partners.adobe.com/asn/developer/acrosdk/DOCS/pdfspec,pdf> 
PostScript Language Reference, Third Edition 
<http://partners.adobexom/asn/developer/PDFS/TN/PLRM,pdf> 
Thinking in PostScript 

<http://www,rightbrain,com/pages/book-download,shtml> 

■a 


Interested in writing for 
MacTech? 

You can Download our 
writer's kit from 

www.mactech.com 
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WEBOBJECTS 


By Sam Krishna and Patrick Taylor 


The Not-So-Infinite Loop: 
Request-Response in WebObjects 


In the beginning there 
was the Web... 


When Tim Berners-Lee wrote 
Web.app (the first graphical web 
browser) using Nextstep tools, he 
couldn't liave imagined the way the 
World Wide Web (l) would captivate an 
unsuspecting public. As revolution:!ty as 
it has become, Berners !ee\s creation 
wasn't a unique event. There were 
many predecessors to the Web which 
ranged from Vannevar Bush's ambitious, 
but ahead-of-lhe-UxHmology, Meuiex to 
Ted Nelson's ambitious, but 
directionless, Xanadu, Unlike most of its 
predecessors though, the technology 
behind the Web was — and is — 
remarkably simple, especially when you 
consider how it is l>eing applied today. 

Most everyone knows at least a 
bit about how the Web works. With 
a browser dial supports HTTP 
(hypertext transport protocol), a 
user connects to a remote server 
using an URL (Uniform Resource 
Locator) stored as either a 
bookmark or from a hypertext link 
on a document located at another 
remote location. The browser then 
proceeds to interpret the HTML tags 
in a fexi file on the remote server, 
formatting the text file based on the 
tagging. Hypertext links within 
index pages serve as springboards 
to other documents both within the 
current server or any number of 
servers around the world. 


The number of those servers increased beyond 
anyone’s reasonable expectations. By 1993, there were 
50 web servers. Two years later there were 200 times 
as many. By 1998 there were well over 6 million and 
lens of thousands are added every day. 

This was not the way the world was supposed to 
turn out. Back in die early 1990s, pundits were 
predicting that in the future information was going to 
be available to everyone on CD-ROMs with exciting 
multimedia interfaces: dictionaries, encyclopedias, 
games, cookbooks, repair manuals, baseball .statistics; 
the knowledge of the world was going to be at your 
fingertips. As the speed of CD-ROMs leapt from 150 
KBps to 300kBps and beyond, all manner of exotic 
data would be available ... for a reasonable price. It 
actually seems a bit funny looking back, but Bill Gates 
wasn't the only who didn't "get M the Internet until late 
1995. Only the most visionary or lunatic individuals 
would have bet that the Web was the future much 
before then, though nowadays the whole world claims 
to have seen it coining as far back as 199b 

Of course, we know how things turned out. Tim 
Berners-Lee created the tool that provided the 
foundation for e-commerce, the rise of open source 
development as a mass movement and 11,000 point 
Dow Jones stock-markets. Would that all Nextstep apps 
have been so successful! 

Goon Enough, But Not By Itself 

Berners-Lee wasn't out to revolutionize the world, 
but rather to create a useful Lool that would let 
researchers at the European Center for Nuclear 
Research (CERN) share documents and data. Of course, 
ii didn’t take a nuclear physicist to see the advantages 
to hypertext linking and the simplicity of the Web's 
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Get Started Programming 'with 


Developer Depot, the home < 
hundreds of tools for softwai 
development, web develo) 
ment, network administratio 
and other tools and toys f< 
techies! Visit our ne 
Getting Started store f< 
everything you need to sta 
developing on the Mac! 


AppMaker 

$139 


Just point and click, 
drag and drop and 
AppMaker builds your programs 
interface. One click can the gen¬ 
erate the source code in C, C++, 
Java, for Tools Plus Pro, or for 
PowerPlant! 


* 


Future BASIC 3 

$159 


The easiest and most 
flexible way to develop 
applications on the Mac! A the pro¬ 
gram builder let's you create your 
application with drag and drop tools. 
The only BASIC development system 
that let's you have 100% access to all 
the power of the Mac Toolbox! 


The easiest way to learn how to 
build C/C++ and Java applica¬ 
tions! Contains the award win¬ 
ning Code Warrior Development 
system, example source code, 
and "how-to" books on CD ROM! 


Discover Programming 
for Macintosh 

$44.95 


•>' •Xstf U,<*1 M #lpll * 1ft • Hi '0 t* I H & • ir f i * * i 1 

PO Box 5200 Westlake Village, CA • 91359-5200 • Voice: 800/MACDEV-l (800/622-3381) 
Outside US/Canada: 805/494-9797 * Fax: 805/494-9798 • E-mail: orders@devdepot.com 















Value versus Cost: the WebObjects Dilemma 

1 suppose this is as gcxxl a segue for whaL Wel^Ohjects costs as any. Unless you are fortunate enough to be an 
academic purchaser, a developer's licence for Wetobjects/EOK will set you back US$1499, This isn't a licence to deploy 
only to develop, you will have to get a separate licence to deploy your application ranging from $5000 (for a 100 
transactions per minute license) to $50,000 for an unlimited transaction, multiprocessor licence. Since every version of 
WebObjects includes the same software, all you need to do is enter a new licence kuy and the system will automatically 
accept a greater number of transactions (tip to the limit allowed by hardware and the underlying operating system. 

Academic developers can make out like bandits given Apple's incredibly generous academic bundle. For $99* 
academic (non-commercial) developers get a developers licence ($1499) and an unlimited transactions single¬ 
processor licence ($25,000). This may be the best reason yet lo upgrade your university degree. GStl 


design over handling paper documents. But if all the 
Web had been good for was posting acronym-ladden 
documents and pictures of your cat, its growth might 
have stalled long ago. 

Text and links gave way to a host of new 
datatypes. By adding new tags to a simple and flexible 
system, it was possible to extend the Web far beyond 
its early limitations; images, video, audio, animation 
and interactivity became realities as pioneering 
Individuals pushed the envelope further and further 
and further. 

However, while the types of documents changed 
dramatically, the way those documents were served 
didn't change quite so much. Apache today is a much 
better web server than 11'lTPd was in the early 1990s, 
but it still serves static documents in basically the same 
way. You can create amazing web sites, however if you 
build them with straight HTML pages the sites can't 
scale very well, It's a hassle to rewrite HTML and the 


hassle grows geometrically with the number of pages 
and their complexity. And if it’s difficult to rewrite your 
own HTML, imagine picking up after someone else! 

If you want Lo go beyond static web sites (coherent 
collections of text-based HTML documents) you need 
to move to scripting or web application servers. If you 
don't mind hand-coding virtually all of the dynamic 
behaviour in your site, you may opt to use Perl nr any 
number of scripting languages to dynamize your 
website. Don't fool yourself, remarkably sophisticated 
sites have been created w ith scripting languages alone, 
but not everyone is prepared to start from scratch. Or 
has the patience or time lo do so. 

And while WebObjects isn’t the only web 
application server, it is the most mature, WebObjects 
backed by EOF is an industrial strength foundation for 
demanding web sites, which may sound like the PR 
material youll read about most web application 
servers, but in this case it’s real. If your site tops off at 


Fight Boredom 

Let’s face it: Much of programming is boring 
and repetitive. Well, that’s where the right 
tool can save days, weeks, or even months 
of your valuable time. 



Model - Vie w-Con trailer 

AppMaker’s generated code uses the MVC 
paradigm. It separates the user interface 
from application logic, making code easier 
to write. You deal only with abstract data; 
AppMaker takes care of the user interface. 


AppMaker 

Your Assistant Programmer 

AppMaker makes it faster and easier to make an 
application. It’s like having your own assistant 
programmer. You point and click to tell 
AppMaker the results you want, then it 
generates “human, professional quality code” 
to implement your design. 


Scriptable Applications 

AppMaker generates the ’aete’ resource and 
generates code to access your data 
(Properties and Elements in the Apple Event 
Object Model) and to handle Events. 

Just $199 from www.devdepot.com B • O »W »F. «R ♦ S 

De velop m en t 

P.O. Box 929. Grantham. NH 03753 • (603) 863-0945 • FAX 863-3857 
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If you didn't know then, you will now. Introducing MacBuy.com. The first and only comprehensive buyer's 
guide from the editors of Macwortd magazine; with MacBuy.com youTl know... 


...which products to buy. And which to avoid. 

The best deals on the Web. And where to find them. 
How much it costs. And how much it's worth. 

www.macbuy.com 

The Macwortd Buyer's Guide 


As Easy as 1-2-1 

Whether you're searching for a 
product review or finding the Pick 
Of The Day, it's easy with 
Mac Buy. corn's dean user interfere 
and intuitive navigation. 

Convenience and Value! 

The latest and lowest prices from 
leading Mac resellers. Plus, 
convenient links to their sites so 
you can purchase the product you 
want instantly! MacBuy.com tells 
you how to shop smart 

Powerful and Easy-.,. 

to-use search engine. You can 
search by product or vendor name, 
or use tire Power Search button to 
search by multiple criteria, such 
as rating and price. 

Support from Apple 

Literally. Built with Apple's 
WebObjects, MacBuy.com is solid 
as...well, a rock. 

From the publishers of Macworld magazine 
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Thi- WebObjects Team 


WebKit 

Bruce Ong 

Nico Popp 


WebObjects 1.x - 3.1 

Bruce Ong* 

Nico Popp* 

Charles dTlarcouri** 

Francois Jouaux (joined late in WO l*x) 


Architectural Co risullan Ls 

Marie Hu tot 

Bertrand Seri el (acting manager) 

Craig Federighi 


WebObjects 3*5-4.0 

Francois Jouaux 

Charles Lloyd 

Eric Bailey 

Andrew Belk 

Craig Federighi (manager)*** 


* Left to found Real Names before WO 31 

** Left after WO 2,0 

*** Left alter WO 4*0 for Ariha 

shipped 
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a half dozen pages, you definitely will not need 
WebObjects, but for anyone with complex web needs 
like those of web publications and e-commerce sites, 


you won't find software better than die 
WebObjeets/EOF combo at any price. 

The Weu Now Available 
with the Power of Objects! 

WebObjects started its life as a skunk works project 
by Bruce Ong and Nico Popp, two quality assurance 
guys from the EOF and Openstep teams. Bring 
programmability and database access through an HTML 
interface was just one of those bright ideas that seems 
inevitable in retrospect, much like the Well itself. 
Under the codename 1f WebKit, 11 management bought 
into the idea and the team created some basic demos 
including an application that rendered weather reports 
for windsurfers* 

In its first two versions, WebObjects was built to 
work with the EOF I.x stack and had an earlier, more 
limited form of state management but the outlines of 
die present architecture began to show. It wasn't until 
WebObjects 3-0 dun. the modern EOF 2.x-backed 
structure which still exists today (in a more refined 
form) came to be. 

One of the goals of WebObjects was to provide as 
much of the power and flexibility of a desktop 
application over the Internet* Unlike desktop apps 
which respond ro peripheral events, WebObjects apps 
respond 10 HTTP requests, which creates some 
I i mitations due to the stateless nature of the protocol 
(1 XThere are some basic generalizations one can make 
about the behaviour of a web transaction; a browser 
will initiate a request from a particular server, and that 
server will respond widi either the required Hie or a 
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in one shot! 

The MacTech CO-ROM with 
THINK Reference is the 
essential reference resource for 
Macintosh programmers. This 
CD includes the THINK 
Reference personal database 
system and a wealth of 
Macintosh programming 
databases, featuring almost 170 
issues of the journal of 
Macintosh programming — 
MacTech Magazine.This release 
also features the THINK 
Reference Compiler, which 
allows you to compile HTML 
files into your own compact, 
searchable THINK Reference 
databases, and the THINK 
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message slating that the requested file is unavailable. 
By hiding behind an I IYW server and communicating 
through adaptors a VehObjcvts-kickcd jpplk'uihm 
doesn't look any di fie rent to a browser than a regular 
web server would, which is exactly what the designers 
intended. Other than a funny looking I’RL, nothing 
about the documents served from a WebObjects-baser 1 
site should look different to a browser than a regular 
static document. 

The play-by-play of how a WO application serves 
a document is quite simple; 

1, The user's browser requests a page from an 
HIT! 1 server 

2. The server passes the request on to the WebObjects 
HTTP adaptor {which can use either CGI or. for 
performance reasons, a native plug-in architecture 
like NSAPI for Netscape servers) 

3* The WO application calls lakeValuesh'romKetjuesiO 
{Java) or takeVa I uesFromRequest: inContext 
{Object ive-C) 


4. The WO application sends a message to the class 
responsible for managing the page, if any exists 

3. After all the appropriate classes have responded, 
the WO application collects the data lo populate the 
required template, generates a new HTML page and 
then sends it to the WO Adaptor 

6. The WO Adaptor passes the response to the 
HITT server 


7, The HTTP server returns the page back to the 
web browser 

In most circumstances, you as a developer will 
only have to write code for steps 3 and 4, the rest of 
the behaviour is available as the default lo the 
environment. WebObjects is not unique in providing 
so m e fc mn of req uesi res pi * nse ey cle a ece ssible to 
programmers even among other web application 
servers. What is different though is that WO requires 
virtually no programming in order to take advantage 
of the request-response cycle. In fact, In most 
circumstances it is unlikely that youII need to directly 
intervene at all. This isn't the case for most other 
application servers which require far more hand- 
eoding, often forcing the developer to write complex 
spaghetti code (3) for the most common situations. 


Making The Web Server Adaptable 

When it comes to serving documents WebObjects 
takes a very agnostic view of the type* of welt server it 
prefers. The default adaptor it uses to communicate 
between itself and the HTTP server is the virtually 
omnipresent CGI. While common, however, CGI isn't 
well-suited to high-demand situations because it has to 
be reloaded for each and every request. So Apple 
provides different ways of hooking into HTTP servers 
that allow it. For servers with native plug-in APIs, 


Strictly speaking, there are several more types 
of files associated with a web component. Compiled 
code specific to a component is stored outside of 
the page templates in java {tor Java, natch) or 
(for Objective-C) files. If you built the web 
component using Project Builder, a apt file is also 
created where you can place any API that should be 
public to other components. Mi 


specialized adaptors are provided lo eliminate this 
potential bottleneck. An interesting result of this 
design is that Lhe web application doesn't need u> be 
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hosted on the* same machine (or even run on the same 
operating system or hardware platform) as the web 
server it only needs to know where the adaptor is, 
thereby allowing developers to create sophisticated 
load balancing arrangements suited to an application’s 
particular needs. 

Since a WebObjects-based she can potentially have 
multiple applications running at the same time, 
We I >0 b j ec is at t e mpts to si m plify th e p rc> cess <) f fe ny i n g 
information by placing directions within the URL it 
generates (this is the default, however much of this 
information can also be stored in cookies, as hidden 
fields in the HTML or some other customized session 
management approach). By parsing the URL, the 
adaptor can tell which instance of which application it 
should communicate with, the page requested, the 
requester's session ID and the element ID specified. 

For example, parsing this URL tells us some 
interesting information; 

<http://store.applexom/1-800-MY- 

APPLE/WebObjects/canadastore.woa/155/wo/FEcODIWgREnfaBSGZ 
2/3,5,03.27,1> 


The site I visited is the Apple Store, but in this case 
it was running an application called canadastore, 
which provides Canada-specific prices and 
information. For performance reasons, the developers 
set up the site to have multiple instances (the one l 
was on was number 155). FEcOD 1 WgREnfaB5GZ2 is the 
alphanumeric sessiontl) assigned to that particular 
transaction. And, 3.5.03.27.1 is the element 11) assigned 
to the 04 I was looking at. These session and element 
IDs are ephemeral though for security reasons and will 
expire after a developer-determined period of time. 
When 1 looked at the siLe again after closing the 
window, the site returned the following URL; 

http://store.apple.eom/1 800-MY- 
APPlT/WebObjects/canadastore.woa/165/wo/2bHI 
EOPFaoyshNOll 3/2.5.0.3.27.1 

As you can see it would be difficult to guess or 
even teatl the session information for a particular user 
making it incredibly difficult to hijack someone else's 
transaction. This information however is sufficient to 
overcome the empty, stateless divide between the 
WcbOhjceis application and the user's browser. 


It's Black and White: 


Either you want a "Smart home", 
or a "Clapper" is enough... 
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Get infected I Visit the website and join a large 
discussion list of avid and helpful users. 
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Armed with lilts session information, the adaptor 
— whether CGI or one of the others — transmits IDTP 
requests it receives from the web server and passes 
them to the WebObjects application instance in a form 
it can understand. Alternately, on the return trip, the 
adaptor receives the HTML documents from the 
WebObjects application instance and passes it on to 
the web server for eventual delivery to the user’s 
browser. This is the first par! of the WebObjects 
request-response lot >p. 

A Puce for Everything, and Everything in its Place 

There are several ways of expressing the 
development philosophy behind the tools Apple 
inherited from NeXT, but it all boils down to keeping 
different kinds of code separate. The interface code 
shouldn't mix with the business logic, which is kept 
distinct from die data. Part of the reason WebObjects 
apps are developed so quickly is because it is harder for 
you as a developer to write spaghetti code which oilier 
development environments actually seem to encourage. 

Not to hush Bill Gates when he’s down, but 
Microsoft is one of the worst offenders in this tendency 
to arbitrarily mishmash web application elements, 
Microsoft Active Server Pages places the HTML template 
code, the preferred HTTP response, the programming 
logic, and SQL commands all in a single ASP source file. 
For developers accustomed to the Model-View* 
Controller (MVC) approach of WebObjects/EOH and 
Cocoa, this is an excruciating mess. And if you imagine 
how much worse it becomes when you start involving 
database managers, graphic designers and HTML coders 
in your project, you may come to appreciate the anal 
retentiveness of the MVC philosophy. 

WebObjects creates these templates or web 
components using up to 4 types of files: a .IvtmI, a 
,wod, a .woo, a .woi If you use compiled languages 
like Java or Object ive-C exclusively instead of Apple’s 
interpreted language,WchscripL you’ll only have the 
first three types. 

A .(mill file is the HTML template which collects 
different components (whic h c an be made up of other 
HTML fragments) Logether and provide the shell into 
which WebObjects structures the data it gcLs most of 
the time from EOF. Yon would be able to recognize a 
WebObjects specific Form tag by looking for 
<WF.BORJECT NAME-'Form 1 ..c/WFBOBJECT>. 

A ,wod file is the WebObjects Declaration Tile, 
which assigns values to dynamic elements used In the 
HTML template. They can be either constants or 
bindings to variables, methods or entities, In the 
previous example WOForrn would be assigned to 
For ml to let i he application know what type of WO Lag 
il was dealing with. By separating the declarations 



1-88-USB USB US 

-or- (1-888-728-7287) 


Worldwide Distributors of USB 
and FireWire Parts, 
Peripherals and Accessories 

Hey Developers: 

http://www.uebstuff.cam/developers,htrnl 


1-877-4 HOTWIRe 

-or- 1-877-446-8947 
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from the interface, WebObjects makes the job of both 
the developer and the server easier. The developer is 
free to modify the interface without lots of declarations 
littering die code, while the server doesn’t have to 
parse potentially huge files just to find declarations. 

You will rarely need to manually edit a .woo file. 
It is used to setup Display Groups and stores 
information about which version of WebObjects was 
used to develop the app. 

Clean and Simple 

WebObjects gives die developers a number of 
vector poinis to modifying object behaviour without 
overwhelming them with choices. If you cl id want to 
change the standard request-response loop, there are 
three places where a developer can intercept and 
augment it: the Application class, the Session class and 
the individual WOComponent class for the given page. 
The appropriate place to intercept the request - 
response loop will be decided by whether you wish 
the behaviour to be global to your application, limited 
to a particular session, or a special case for a specific 
page. In any case, the Application class will be the first 
called when the loop is modified following by Session 
and Component respectively. 
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The sooner you find that last bug 
the sooner you can ship, 
and the sooner you can sleep. 


Find these and other essential developer tools at 



only $189! 

"Automatic Debugging" on the Macintosh. 
Easy to use. Spotlight can automatically 
find run time bugs in your code without 
your having to change one line of your code. Naif down 
random bugs immediately. Ever dereference the wrong 
pointer? Ever pass the wrong value to a toolbox command 
or over write an array? Your compiler often lets the code 
compile Fine and you may not find that bug until you T ve 
burned it into CD-ROM or released it to the net. Find the 
bugs now, kill them easily, get to sleep sooner 

J .D 

only $39.95! 



only $79! 

The only thing more frustrating that bugs, h 
bug reports. Users will send in everything 
from war and peace to "it crashed." BugLinl 
Solo let's you define what information you want in a bue 
report, then include a customized BugReporter application witf 
your application. Users simply dick open the reporter, fill in the 
boxes, and click send. The report is transparently sent to ths 
email address you defined, Buglink can login into that eMai 
account, download each report, and present you with on orga¬ 
nized, complete, description of each bug. Great for shareware 
developers, system administrators, and web developers! 



Every doctor knows, the secret is listening to the patient. The most frustrating part about debugging on Macintosh is you can't "printf 1 ' 
to show the state of a variable or position in your code. DCon let's your code to talk to you. This system extension adds a console 
window and file logging services to Macintosh and can be used to record and display status and debugging information durinc 
development. It can be called from virtually any code, any where at any time - even from interrupt handlers, I/O completion rou 
tines, VBL tasks, deferred tasks, and more! DCon does not allocate memory in any Mac developers debugging arsenal. 

www^devaepoLcom 


PO Box 5200 Westlake Village, CA 91359-5200 * Voice: 800/MACDEV-1 (800/622-3381) 
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There are three methods which can directly 
interact with the request-response cycle: 

Java Objective^ 

takeValueaFratJiRequest () - taka Value sFrottiRequest; inConlexL: 

invokeActicmForRequest [3 invokeActionForRequest:inContext: 

a ppe hdToRes ponse () a ppe nrtToResixins e: i nCbntex t; 

The method takeVttluesFmrnRcquest() is used to 
process the incoming WOReqtiest object that the 
WO Adaptor creates immediately after processing the 
HTTP request the adaptor received from the HTTP 
server. This method is normally used to get Form 
values and any other inputs that may have been passed 
tlirough (like a radio button or checkbox selection). By 
overriding this method, you have considerable control 
over the request-response loop. [Examples???! 

The method invokeAetlonForRequeslO is used to 
actually call a component action that will return a 
page. If your application has mandatory fields in a 
Form tli at a user might neglect to fill out, overriding 
this method will allow the application to redirect the 
user to the correct page after verifying that correct 
information doesn't exist yet. Rather than littering your 
HTML with conditional responses, the developer can 
create alternate documents which the application can 
serve depending on the circumstances. 

The method append ToResponseO allows you to 
change the state of your component after it has been 
generated but before being relayed to the adaptor.You 
can perform last minute manipulations of your data 
before it is sent to the user. A potential use would be 
if you store some special state tht you don't want to 
leave in the session, so you could generate a cookie 
and append it to the response in the overridden 
method. As well, custom hand-coded HTML could be 
appended programmatically if you wished. 

There are two methods that are important to note: 

Java Objcctivc-C 

awake -awake 

sleep -sleep 


The method awake is called every time a 
component is aL the beginning of the request-response 
cycle. It's normally used by the developer to perform 
request-handling initialization. This method is different 
from either the constructor in java or the -init method 
in Object]ve-C. The latter two are called once when the 
class is first instantiated the very first time the page is 
returned. The awake method is called whenever a 
page component begins a new request-response cycle 
and may also be sent several Limes during the same 
request-response cycle to the same component. 
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Our software engineers work with you to: 

* Create clear, solid project specifications 

* Design and develop your application or web site 
•Tune and optimize your software’s performance 

• Thoroughly test your application or site 

• Completely document your project 

• Provide training to your team 


Do you have an exciting idea for an application? 
Turn to Always Thinking to make it a reality We 
have firsthand experience developing and shipping 
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transform your company into an e-business. 

Successful web sites are more than graphics and 
code. We have the Internet marketing know-how to 
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The sleep method is usually overridden in order to 
perform posi-requesi-rcsponse processing. For 
example, you could begin manual garbage collection 
in Objective-C in the sleep method. As you can 
pmbal>ly guess, this method is rarely used except in 
special cases where you must perform some sort of 
clean-up duties. 

As stated before, most applications require little or no 
Fiddling with the request-response loop. Once data has 
been pulled in from HOF, WebObjecrs constructs genuine 
I if ML web pages that it passes on to adaptor, ! he adaptor 
relays it to the HTTP server which then transmits it to the 
browser* And the cycle can begin again. 

Footnotes 

(I) WWW is perhaps once of a small handful of 
acronyms which have more syllables than the 
phrase which it is intended to shorten. This has 
lead to numerous alternative names like ”The Web" 
or "dub-dub-dub" or, in more confused individuals * 
The Internet” 
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(2) A stateless protocol doesn't know anything 
about previous transactions. Each request and 
response cycle is treated as being a self-contained 
session * For the Web, this is a good thing in some 
respects, it does provide a degree of privacy to users 
by requiring extreme efforts on the pari of site 
owners to track sessions and it also reduces the 
amount of information that must be stored and 
transmitted during an exchange between the browser 
and the server. For e-commerce, however, it sucks. 

(3) Spaghetti code is a derogatory term for 

programming done without a coherent structure. 
While it often occurs when a developer is rushed, 
much of the worst spaghetti code occurs because 
the development environment forces the developer 
to write that way , GEO 
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